Код Ревью

Сравни свои решения

    #| BEGIN (Введите свое решение) |#
(define (solution a b c)  
    (cond ((and (>= a c) (>= b c)) (+ (* a a) (* b b)))
          ((and (>= b a) (>= c a)) (+ (* b b) (* c c )))
          (else (+ (* a a) (* c c)))))
#| END |#