character(10**5) S
integer cnt
read*,S
!0101のリズムとあわせてみて1010のリズムどっちがあってるか判定して
!あってる方と合わせる感じでいきます
cnt=0
do i=1, len_trim(S)
  if(mod(i,2)==1)then
    if(S(i:i)=="0")cnt=cnt+1
  else
    if(S(i:i)=="1")cnt=cnt+1
  endif
end do
print"(I0)",min(len_trim(S)-cnt,cnt)
end