open System let read() = Console.ReadLine() let N = read() |> int let S = read().ToCharArray() let T = read().ToCharArray() (S,T) ||> Array.map2 (fun s t -> s<>t) |> Array.where(fun x -> x) |> Array.length |> printfn "%i"