m@main=getLine>>=putStrLn.map maximum.scanl1(++).map(:[])>>m