Exercise 1.3 Sum of the squares
onter7

Code Review

Compare your solutions
    #| BEGIN (Введите свое решение) |#
(define (solution x y z)
  (cond ((and (> x z) (> y z)) (+ (* x x) (* y y)))
        ((and (> x y) (> z y)) (+ (* x x) (* z z)))
        (else (+ (* y y) (* z z)))))
#| END |#

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

(define (sum-of-squares x y) (+ (square x) (square y)))

(define (solution x y z)
  (cond ((and (> x z) (> y z)) (sum-of-squares x y))
        ((and (> x y) (> z y)) (sum-of-squares x z))
        (else (sum-of-squares y z))))
#| END |#

    #| BEGIN (Введите свое решение) |#
(define (solution x y z)
  (cond ((and (> x z) (> y z)) (+ (* x x) (* y y)))
        ((and (> x y) (> z y)) (+ (* x x) (* z z)))
        (else (+ (* y y) (* z z)))))
#| END |#

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

(define (sum-of-squares x y) (+ (square x) (square y)))

(define (solution x y z)
  (cond ((and (> x z) (> y z)) (sum-of-squares x y))
        ((and (> x y) (> z y)) (sum-of-squares x z))
        (else (sum-of-squares y z))))
#| END |#