import Control.Applicative
import Control.Monad
import Data.List

main = getLine >> words <$> getLine >>= putStrLn . snd . last . sort . map (\a -> (length a, head a)) . group . sort