-- yukicoder My Practice
-- author: Leonardone @ NEETSDKASU

main = interact $ show . snd . maximum . flip zip [0..] . foldl ((. (++ ((1+):repeat id)) . flip take (repeat id)) . zipWith (flip ($)))  (replicate 1001 0) . map (flip (-) 2) . map length . tail . lines