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

main = do
  x:y:z:_ <- solve <$> replicateM 10 getLine
  print x
  print y
  print z

solve :: [String] -> [Int]
solve = reverse . sort . map read