Code Review
Compare your solutions
#| BEGIN (Введите свое решение) |#
(define (solution x y z)
(define max (cond((and (> x y) (> x z)) x)
((and (> y x) (> y z)) y)
(else z)))
(+ (* max max)
(cond((and (< x max) (or (> x y)(> x z))) (* x x))
((and (< y max) (or (> y x)(> y z))) (* y y))
(else (* z z)))
))
#| END |#
#| BEGIN (Введите свое решение) |#
(define (solution a b c)
(cond ((and (>= b a)(>= c a))(+ (* b b)(* c c)))
((and (>= a b)(>= c b))(+ (* a a)(* c c)))
((and (>= a c)(>= b c))(+ (* a a)(* b b)))))
#| END |#
#| BEGIN (Введите свое решение) |#
(define (solution x y z)
(define max (cond((and (> x y) (> x z)) x)
((and (> y x) (> y z)) y)
(else z)))
(+ (* max max)
(cond((and (< x max) (or (> x y)(> x z))) (* x x))
((and (< y max) (or (> y x)(> y z))) (* y y))
(else (* z z)))
))
#| END |#
#| BEGIN (Введите свое решение) |#
(define (solution a b c)
(cond ((and (>= b a)(>= c a))(+ (* b b)(* c c)))
((and (>= a b)(>= c b))(+ (* a a)(* c c)))
((and (>= a c)(>= b c))(+ (* a a)(* b b)))))
#| END |#