Code Review

Compare your solutions

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

(define (sum-of-squares a b) (+ (square a) (square b)))

(define (solution a b c) 
  (cond ((and (> a b) (> c b)) (sum-of-squares a c))
        ((and (> b a) (> c a)) (sum-of-squares b c))
        (else (sum-of-squares a b))))
#| END |#