(loop(#0=format t"~A "(apply'+(map'list'digit-char-p(#0#/"~A"(expt 4(read)))))))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page