《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)
Comments: