END{for(x=3;x<1998;x=y){y=x+2;for(p=z=3;z<x;)p*=x*y%z++;if(p)print x","y;}}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top