n = gets.to_i
A = [1, 0, 0, 0, 1, 0, 1, 0, 2, 1]
x = 1 + n.to_s.each_char.map {|c| A[c.to_i]}.inject(:+)
y = n.to_s.size
ans = x + y + [x, y].min
puts ans