main=mapM print[z|z<-[1..252],or[all((>0).mod(n+1))[2..n]|n<-[z,z-2]]]