n=0;puts$<.read.split.map{|x|(' '*n)[0,n-=x.size*$.=-$.]+($.<0?x:x.reverse)}