let N, K =
    let t = stdin.ReadLine().Split() |> Array.map int64
    t.[0], t.[1]
    
let ans = N / (K + 1L) + 1L
    
ans |> printfn "%i"