#| BEGIN (Введите свое решение) |#
(define (sum-of-squares x y) (+ (square x) (square y)))
(define (square a) (* a a))
(define (>= a b ) (not (< a b) ))
(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 (>= y x) (>= x z)) (sum-of-squares y x)
        (else (sum-of-squares y z))
#| END |#

    #| BEGIN (Введите свое решение) |#
(define (sum-of-squares x y) (+ (square x) (square y)))
(define (square a) (* a a))
(define (>= a b ) (not (< a b) ))
(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 (>= y x) (>= x z)) (sum-of-squares y x))
        (else (sum-of-squares y z))))
#| END |#