n=scan("stdin") for(i in strsplit(c("PPP","P P","PPP","P","P"),""))write(rep(i,n,,n),1,n*length(i),,"")