for(a=[Y=0];l=readline();Y++)for([i,c]in l){for(s=a[y=Y-i]||'';s[-1]/2<Y+i;)s+=' '
a[y]=s+c}for(;y++<52;p&&print(p))p=a[y-i]