Anonymous user
Perfect numbers: Difference between revisions
Logo
No edit summary |
(Logo) |
||
Line 255:
return sum.compareTo(n) == 0;
}</lang>
=={{header|Logo}}==
<lang logo>
to perfect? :n
output equal? :n apply "sum filter [equal? 0 modulo :n ?] iseq 1 :n/2
end
</lang>
=={{header|MAXScript}}==
| |||