(= n(read)v(read)k(expt 10 100)x k)(for i 1 111(++ x(trunc:/(+(/(- -1 x)(/:expt x n)v(expt k n))x)n)))(pr((= s(+""x))0)#\.(cut s 1))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page