【SICP练习】67 练习2.38

练习2.38

这道题比较有意思了，我们先来将fold-left和accumulate类比，accumulate是递归，而fold-left是迭代。前者通过不断地将(op result (car rest)变换成initial，通过将(cdr rest)变换成sequence，而rest一开始其实就是sequence，result一开始则是initial。

result——(op result (car rest))

rest——(cdr rest)

因此我们将(fold-left / 1 (list 1 2 3))展开如下：

(iter 1 ‘(1 2 3))

(iter (/ 1 1) ‘(2 3))

(iter (/ (/ 1 1) 2) ‘(3))

(iter (/ (/ (/ 1 1) 2) 3) ‘())

(/ (/ (/ 1 1) 2) 3)

(/ (/ 1 2) 3)

(/ 1/2 3)

1/6

既然书上说了accumulate又称为fold-right，也就是accumulate的定义同样适用于fold-right了。而它就更加简单了：(/ 1 (/ 2 (/ 3 1) ) )，也就是3/2。

将其中的值代换一下得到：(list 1 (list 2 (list 3 ‘() ) ) )，也就是(1 (2(3 () ) ) )，这就是第三小题的结果了。

而第四小题将第二小题的过程代换一下就是如此：(list (list (list ‘() 1) 2) 3)，也就是( ( ( ‘()1) 2) 3)。