import Control.Applicative ((<$>))
import Data.Char (digitToInt)

main :: IO ()
main = do
  solve <$> getLine >>= print

solve :: String -> Int
solve = sum . map f
  where
    f c | c == '0' = 10
        | otherwise = digitToInt c