a[42][42];c,x;main(d,y){for(y=16;(c=getchar())>10;d+=c<33,x+=d%2,y+=5%(d%4+1)-1)sprintf(a[y],"%-*s%c",x,a[y],c);for(;c++<30;)*a[c]?puts(a[c]):0;}