Anonymous user
Factors of an integer: Difference between revisions
→Raku: fix to get expected results e.g. 4 -> (1, 2, 4) instead of ((1, 4), (2, 2))
m (→{{header|REXX}}: added output.) |
(→Raku: fix to get expected results e.g. 4 -> (1, 2, 4) instead of ((1, 4), (2, 2))) |
||
Line 5,192:
(formerly Perl 6)
{{works with|Rakudo|2015.12}}
<lang perl6>sub factors (Int $n) { squish sort flat ($_, $n div $_ if $n %% $_ for 1 .. sqrt $n) }</lang>
=={{header|REALbasic}}==
| |||