main=interact(unlines.f.lines)
(%)=replicate
f l=l#maximum(map length l)
s&l=s:l++[s]
l#w=(w+4)%'#'&map(!w)(w%' '&l)
l!w='#'&(' '&l++(w-length l)%' ')