m@main=do n<-getLine;putStrLn$map maximum$tail$scanl(flip(:))""n;m