let solve n = 1

type mode = CSharp | FSharp

let _ =
  let n = Scanf.scanf "%d\n" (fun n -> n) in
  let ar = Array.make (n+1) '#' in
  let cnt = ref 0 in
  for i = 0 to n - 1 do
    Scanf.scanf (if i <> n-1 then "%c" else "%c\n") (fun c -> ar.(i) <- c)
  done;
  let left_sharp = ref 0 in
  let mode = ref CSharp in
  let tmp = ref 0 in
  for i = 0 to n - 1 do
    match !mode with
    | CSharp ->
       if ar.(i) = '#' && ar.(i + 1) = '.' then (left_sharp := !left_sharp + 1; mode := FSharp)
       else if ar.(i) = '#' then left_sharp := !left_sharp + 1
    | FSharp ->
       begin
         if i = n - 1 && ar.(i) = '.' then (tmp := !tmp + 1; cnt := !cnt + (min !tmp !left_sharp))
         else if i = n - 1 then cnt := !cnt + (min !tmp !left_sharp)
         else if ar.(i) = '.' then tmp := !tmp + 1
         else (cnt := !cnt + (min !tmp !left_sharp); left_sharp := 0; tmp := 0; mode := CSharp)
       end
  done;
  print_int !cnt
