char s[99];x;y;main(c,q){q=(read(0,s,99)+3)/4;while(y<=q){for(x=0;x<=q+1;x++){c=x==q+1?10:!y?s[x]:x==q?s[q+y]:!x?s[4*q-y]:y==q?s[3*q-x]:0;putchar(c?c:32);}y++;}}