S = gets.chomp
C = Array.new(10, 0)
S.each_char do |c|
  C[c.to_i] += 1
end
h = C[0] + C[4] + C[6] + C[9] + 2 * C[8]
puts [2 * S.size + h + 1, S.size + 2 * (h + 1)].min