{-# LANGUAGE ScopedTypeVariables #-}
import Control.Monad
import Data.List

main :: IO ()
main = (replicateM 3 readLn :: IO [Int]) >>= mapM_ putStrLn . map snd . reverse . sort . flip zip ["A", "B", "C"]