open System

let N, K = Console.ReadLine().Split() |> Array.map int64 |> fun a -> a.[0], a.[1]

Console.WriteLine((N + K + 1L) / (K + 1L))