(let ((x (read)) (y (read)))
  (print (if (zero? (modulo y x))
             (/ y x)
             (floor (+ (/ y x) 1)))))