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