Non Decreasing Digits by youz

(read)(loop(format t"~A ~A
"(read)(/(!(+(set'n(read))9))(! 9)(! n))))

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

download

return to the top page