Practical Numbers by nn

for n=1to 500s=1
for i=1to s:s=s+i*!mod(n,i)next
if!s<n?n
next

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page