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