import Control.Applicative
import Data.List

main :: IO ()
main = solve <$> sortBy (flip compare) <$> f >>= print
  where
    f = map read <$> words <$> getLine

solve :: [Int] -> Int
solve [a, b, c] = a * 10 + b + c
