(define a (read)) (define b (+ (read) (/ 1 10000))) (define d (ceiling (/ b a))) (print d)