import Data.List

main :: IO ()
main = getContents >>= mapM_ putStrLn . map snd . reverse . sort . flip zip ["A", "B", "C"] . map toint . lines

toint :: String -> Int
toint = read