sicp 习题 2.23

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

#lang planet neil/sicp
(define lst (list 57 321 88))
(define thing (lambda (x) (newline) (display x)))(define (for-each thing lst)(cond ((not (null? lst))(thing (car lst))                     (for-each thing (cdr lst)))))

运行结果:

Welcome to DrRacket, version 5.3.3 [3m].
Language: planet neil/sicp; memory limit: 512 MB.
> (for-each thing lst)


57
321
88
> 

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

---