1.upto(2e3){|n|m=n;1while(m=eval"#{m}".gsub /./,'+\0*\0')>4;m>1or p n}\x0d
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page