Jump to content

Sum of the digits of n is substring of n: Difference between revisions

(Add COBOL)
Line 603:
end loop;
print_nl();</lang>
{{out}}
<pre>0 1 2 3 4 5 6 7 8 9 10 20 30 40 50 60 70 80 90 100 109 119 129 139 149 159 169 179 189 199 200 300 400 500 600 700 800 900 910 911 912 913 914 915 916 917 918 919</pre>
 
=={{header|D}}==
{{trans|C++}}
<lang d>import std.algorithm;
import std.conv;
import std.stdio;
 
int digitSum(int n) {
int s = 0;
do {
s += n % 10;
} while (n /= 10);
return s;
}
 
void main() {
foreach (i; 0 .. 1000) {
if (i.to!string.canFind(digitSum(i).to!string)) {
write(i, ' ');
}
}
writeln;
}</lang>
{{out}}
<pre>0 1 2 3 4 5 6 7 8 9 10 20 30 40 50 60 70 80 90 100 109 119 129 139 149 159 169 179 189 199 200 300 400 500 600 700 800 900 910 911 912 913 914 915 916 917 918 919</pre>
Line 618 ⟶ 643:
Real: 00:00:00.003
</pre>
 
=={{header|Factor}}==
{{works with|Factor|0.99 2021-02-05}}
1,452

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.