2013年2月20日

摘要: (define f (lambda (x) (if (< x 3) x (+ (f (- x 1)) (* 2 (f (- x 2))) (* 3 (f (- x 3)))))));;--(define (f-tail n) (define f-i (lambda (x y z cnt) (if (= cnt 2) z (f-i y z (+ (* 3 x) (* 2 y) z) (- cnt 1))))) (f-... 阅读全文

posted @ 2013-02-20 17:32 ASOCS 阅读(145) 评论(0) 推荐(0) 编辑