sicp 习题2.18

本文主要是介绍sicp 习题2.18，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

#lang planet neil/sicp
(define a (list 1 2 3))(define (reverse lst)(iter lst '()))(define (iter reminder result)(if (null? reminder) result(iter (cdr reminder)(cons (car reminder) result))))

运行:

Welcome to DrRacket, version 5.3.3 [3m].
Language: planet neil/sicp; memory limit: 512 MB.
> (reverse a)
(mcons 3 (mcons 2 (mcons 1 '())))
> 

这篇关于sicp 习题2.18的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！

---