readlines.each do |s|
  ans = 0
  s.chomp.split("").map(&:to_i).each do |c|
    ans += 1
    ans += case c
           when 0, 4, 6, 9
             1
           when 8
             2
           else
             0
           end
    ans += 1
  end
  ans += 1
  p ans
end