Sum of the digits of n is substring of n: Difference between revisions
Content added Content deleted
Not a robot (talk | contribs) (Add COBOL) |
|||
Line 603: | Line 603: | ||
end loop; |
end loop; |
||
print_nl();</lang> |
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}} |
{{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> |
<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: | Line 643: | ||
Real: 00:00:00.003 |
Real: 00:00:00.003 |
||
</pre> |
</pre> |
||
=={{header|Factor}}== |
=={{header|Factor}}== |
||
{{works with|Factor|0.99 2021-02-05}} |
{{works with|Factor|0.99 2021-02-05}} |