Belgian Numbers by leonid

n=0
exec'a=n\nfor k in`n`*n:a-=int(k)*(a>0)\nif-1<a:print n\nn+=1;'*500

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

download

return to the top page