Anonymous user
Perfect numbers: Difference between revisions
FALSE
m (moved Perfect Numbers to Perfect numbers) |
(FALSE) |
||
Line 208:
<lang erlang>is_perfect(X) ->
X == lists:sum([N || N <- lists:seq(1,X-1), X rem N == 0]).</lang>
=={{header|FALSE}}==
<lang false>[0\1[\$@$@-][\$@$@$@$@\/*=[@\$@+@@]?1+]#%=]p:
45p;!." "28p;!. { 0 -1 }</lang>
=={{header|Forth}}==
| |||