Код Ревью

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

    #| BEGIN (Введите свое решение) |#
(define (square x) (* x x))

(define (solution x y z)
  (cond ((and (<= z x) (<= z y)) (+ (square x) (square y)))
        ((and (<= y x) (<= y z)) (+ (square x) (square z)))
        (else (+ (square y) (square z)))))
#| END |#