SICP:2.40 2.41
摘要:
#lang racket(define (accumulate op initial seq) (if (null? seq) initial (op (car seq) (accumulate op initial (cdr seq)))) );accumulat... 阅读全文
posted @ 2015-04-26 11:07 Zachary_wiz 阅读(128) 评论(0) 推荐(0) 编辑
posted @ 2015-04-26 11:07 Zachary_wiz 阅读(128) 评论(0) 推荐(0) 编辑