use bigint;
($n,$k)=<>=~/\d+/g;
print $n/($k+1)+1