main=do
    [_,a,b]<-getContents>>=return.lines
    print$sum$zipWith (\x y->if x==y then 0 else 1) a b