main=mapM putStrLn[show m++',':show n|n@(m+2)<-[5..2000],all((0<).mod(n*m))[2..m-1]]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page