Practical Numbers by nn

<?for(;++$n<501;$i<$n||print"$n
")for($i=$s=1;$s--;)$s+=$n%++$i?0:$i;

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

download

return to the top page