let () =
  let n, k = Scanf.scanf "%d %d " (fun n k -> n, k) in
  Printf.printf "%d\n" (n / (k + 1) + 1)