(let ((x (read)) (y (read))) (print (if (< x y) 1 (truncate (+ (/ x y) 1)))))