program main
  implicit none

  integer :: n, d, nec

  read *, n, d
  
  if ( d == 0 ) then
     nec = n
  else
     nec = int ( n / ( 2.0 * d + 1.0 ) ) + 1
   end program main

  print *, nec

end program main

