Powerful numbers: Difference between revisions
m
→{{header|Perl 6}}: Verbiage tweaks
Thundergnat (talk | contribs) (→{{header|Perl 6}}: Add a Perl 6 example) |
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: Verbiage tweaks) |
||
Line 289:
}
put "
for 2..10 -> \k {
my @powerful = sort powerfuls(10**k, k);
Line 304:
}</lang>
{{out}}
<pre>
14 2-powerful numbers <= 10² : 1, 4, 8, 9, 16 ... 49, 64, 72, 81, 100
20 3-powerful numbers <= 10³ : 1, 8, 16, 27, 32 ... 625, 648, 729, 864, 1000
|