(define (u13 x y z)
(+
(square (cond
((and (> x y) (> x z))) x)
((and (> y x) (> y z))) y)
(else z))
(square (cond
((and (> x y) (< x z))) x)
((and (> y x) (< y z))) y)
(else z)))
抛出错误。我了解格式错误,但我找不到它。平方定义为:
(define (square x) (* x x))
格式化问题,Vim 保存: