(define (main args) (let* ((a (read)) (b (read))) (if (= (modulo a b) 0) (print (+ (/ a b) 1)) (print (ceiling->exact (/. a b))))) 0)