(define a (read) ) (define b (+ (read) (/ 1 100000)) ) (print(floor->exact (ceiling (*(sqrt (+(* a a)(* b b)))2))))