Perfect numbers: Difference between revisions

Content added Content deleted
(Frink)
Line 1,702: Line 1,702:
=={{header|Frink}}==
=={{header|Frink}}==
<lang frink>isPerfect = {|n| sum[allFactors[n, true, false]] == n}
<lang frink>isPerfect = {|n| sum[allFactors[n, true, false]] == n}
select[1 to 1000, isPerfect]</lang>
println[select[1 to 1000, isPerfect]]</lang>


{{out}}
{{out}}