Code Review

Compare your solutions

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