(dotimes`201(set'n(*(find 0'#.(butlast(loop collect(/(set'n(read))(read))while(listen))):key(lambda(f)(mod n(/ f))))(princ n)))(terpri))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page