import Data.List w%(h:t)|w>""=(read w+h):t|let=0:h:t main=interact$show.((,).head<*>sum.take 3).reverse.sort.foldr(%)[0].lines