import Data.List

main = getLine >>= print . paint

paint n
 | all (flip elem "12357") n = 2 + length n
 | otherwise = length n * 2 + hole n + 1

hole n = sum $ map hole' n
 where hole' c = case c of {'0'->1; '1'->0; '2'->0; '3'->0; '4'->1; '5'->0; '6'->1; '7'->0; '8'->2; '9'->1}