import Control.Monad
import Data.List

main = do
        s <- replicateM 10 getLine 
        let a:b:c:_ = convert s
        print a
        print b
        print c

convert :: [String] -> [Int]
convert = take 3 . reverse . sort . map read

