main = do
 abc <- map read . words <$> getLine
 print $ minimum $ map sum (comb 2 abc)

comb :: Int -> [a] -> [[a]]
comb 0 _ = [[]]
comb _ [] = []
comb n (x:xs) = [x:y | y <- comb (n-1) xs] ++ comb n xs 