(let* ((n (read)) (k (read))) (print (+ (quotient n (+ k 1)) 1)))