Code Review

Compare your solutions

    #| BEGIN (Введите свое решение) |#
(define (square x)
  (* x x))
(define (sum-of-squares x y)
  (+ (square x)(square y)))
(define (solution a b c)
  (cond
  ((and (< a b) (< a c)) (sum-of-squares b c)) 
  ((and (< b c) (< b a)) (sum-of-squares a c)) 
  (else (sum-of-squares b a))
)
  )
#| END |#