(do[(q 1)(s 1)]((> q 2e3))(if(>(#0=modulo(*(#0# s q)(set! s(* s q q)))(inc! q 2))0)(print(- q 2)","q)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page