(define-values (a b) (apply values (map string->number (string-split (read-line) " ")))) (print (ceiling (/ b a)))