(dotimes(i 2e3(loop(#1=format t"~A "(1+(eval(read))))))(set(intern(#1#/"~@R"(1+ i)))i))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page