SICP练习中的错误（练习1.3）

Question

提示是定义一个返回三个数字中两个最大值的平方和的过程。

我知道这不完全是一个完美的解决方案，但是这是我砍死在一起：

(define (largest-of-two-sum-of-squares x y z) 
     (cond ((and (< x y) (< x z)) (sum-of-squares y z)) 
       ((and (< y z) (< y x)) (sum-of-squares x z)) 
       ((and (< z x) (< z y)) (sum-of-squares x y))))) 

什么我不知道是为什么我得到一个错误。

;The object 85 is not applicable 

单词对象后面的数字总是正确的答案，顺便说一句。我是一个计划初学者，它必须是我的语法中的东西？

谢谢

Answer 1

正如sindikat指出，一个多余的右括号。对于那个很抱歉。

Answer 2

这里的另一种可能的解决方案，这一项工作即使在所有这三个数是相等的，或者两个是比其他所有同等或更低的情况：

(define (sum-max a b c) 
    (define (sum x y) 
    (+ (* x x) (* y y))) 
    (if (>= a b) 
     (if (>= b c) 
      (sum a b) 
      (sum a c)) 
     (if (>= a c) 
      (sum b a) 
      (sum b c)))) 

Answer 3

什么

(define (largest-of-two-sum-of-squares x y z) 
    (+ (square x) (square y) (square z) 
     (- (square (min x y z))))) 

？