import Data.Char import Data.List main :: IO () main = getLine >>= print.foldl' (+) 0.map digitToInt.filter isDigit