open System

let No477 () =
    let IN = Console.ReadLine().Split(' ')
    let N = Int64.Parse IN.[0]
    let K = Int64.Parse IN.[1]

    printfn "%d" <| N / (K + 1L) + 1L


    ()

No477 ()