$/=+<<lines;$_=map (*.abs+$2-1)div$2,$0,$1;say @$_.sum+?(.[0&1]>0)