char s[];main(d,l,e){for(d=e=l=read(0,s,s)-2;~d<l;e=l/putchar(e%(l-2)&&e>~l&e*e>d*d?32:s[l-e>>1])?d-=2,l:e-2);}