Anonymous user
Factors of an integer: Difference between revisions
→{{header|Perl 6}}
(Added an Algol W sample) |
|||
Line 2,390:
=={{header|Perl 6}}==
{{works with|Rakudo|2015.12}}
<lang perl6>sub factors (Int $n) { squish sort ($_, $n div $_ if $n %% $_ for 1 .. sqrt $n) }</lang>
|