Код Ревью
Сравни свои решения
#| 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 |#