b=nchar(a<-scan("stdin",""))
c=b/2+.5
for(i in 1:b){if(i==c)cat(a)else{for(j in 1:b)cat("if"(j==i||j==c||j==b-i+1,substr(a,i,i)," "))};cat("
")}