求最大两数之和（SICP 习题1.3 ）

《Structure and Interpreter of Computer Program》中第1章习题1.3说到：

练习1.3 请定义一个过程，它以三个数为参数，返回其中较大两个数之和。

其实这一段的中文版翻译错了，其实原版是说求最大两个数的平方和。但是意思是一样的。

为了这个简单的问题我也思考了挺长时间，就是得不到让我满意的解。三个数如何知道其中的两个较大的？其中的一个办法就是两两比较。但是这样做比较啰嗦，至少要比较三次。特别是用Scheme的写法。而且你最好还要定义变量，去保存中间判断结果。

洗碗时我想到一个解法：先求出最小的那个，然后用(x y z)之和去减去最小的那个值。

代码：

(define (min x y)
   (if (< x y)
       x
       y))

(define (sum-of-large-two x y z)
             (- (+ x y z)
                (min (min x y) z)
             ))

;test
(sum-of-large-two 1 2 3)
(sum-of-large-two 3 1 2)
(sum-of-large-two 3 2 1)

 

转载于:https://www.cnblogs.com/Jerry-Chou/archive/2013/01/06/2847738.html