Код Ревью
Сравни свои решения
#| BEGIN (Введите свое решение) |#
(define (sum-of-square a b c)
(if (and (<= a b) (<= a c))
(+ (* b b) (* c c))
(if (and (<= b a) (<= b c))
(+ (* a a) (* c c))
(+ (* a a) (* b b)))))
#| END |#