s = gets.chomp
n = s.length
if n==1
    puts '0'
    exit
elsif n==2
    puts s[0]==s[1] ? '1' : '0'
    exit
end
m1=[]
m2=[]
n.times do |i|
    m1[i]=i%2==0 ? '0' : '1'
    m2[i]=i%2!=0 ? '0' : '1'
end
d1=0
d2=0
n.times do |i|
    d1+=1 if s[i]!=m1[i]
    d2+=1 if s[i]!=m2[i]
end
puts [d1,d2].min