Code Review
Compare your solutions
#| BEGIN (Введите свое решение) |#
(define (sqr x) (* x x))
(define (sum-of-squares x y)
(+ (sqr x) (sqr y)))
(define (solution a b c)
(if (>= a b)
(if (> b c)
(sum-of-squares a b)
(sum-of-squares a c))
(if (> a c)
(sum-of-squares a b)
(sum-of-squares b c))))
#| END |#