; Write a procedure that takes three numbers as arguments and returns the sum of the squares of the two larger numbers.
(define (sum x y z)
 (cond ((and (> x y) (> y z)) (+ (square x) (square y)))
       ((and (> x y) (> z y)) (+ (square x) (square z)))
       (else (+ (square y) (square z)))
 )
)