import Data.List

main = do
  input <- getContents
  -- mapM_ print $ lines input
  let
    heights = map readInt $ lines input :: [Int]
  mapM_ print $ take 3 $ reverse $ sort heights


readInt :: String -> Int
readInt = read