Distinct power numbers: Difference between revisions
Content added Content deleted
ReeceGoding (talk | contribs) m (→{{header|R}}: Syntax highlighting.) |
Drkameleon (talk | contribs) (Added Arturo implementation) |
||
| Line 295: | Line 295: | ||
{{output}} |
{{output}} |
||
<lang applescript>{4, 8, 9, 16, 25, 27, 32, 64, 81, 125, 243, 256, 625, 1024, 3125}</lang> |
<lang applescript>{4, 8, 9, 16, 25, 27, 32, 64, 81, 125, 243, 256, 625, 1024, 3125}</lang> |
||
=={{header|Arturo}}== |
|||
<lang rebol>powers: sort unique flatten map 2..5 'a [ |
|||
map 2..5 'b -> a^b |
|||
] |
|||
print powers</lang> |
|||
{{out}} |
|||
<pre>4 8 9 16 25 27 32 64 81 125 243 256 625 1024 3125</pre> |
|||
=={{header|BCPL}}== |
=={{header|BCPL}}== |
||