196 algorithm by notogawa

main=mapM f[1..195]
f n|n/=r n=f$n+r n|0<1=print n
r=read.reverse.show

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

download

return to the top page