(let* ([a (read)] [b (read)]) (print (ceiling->exact (/ b a))))