![](https://img-blog.csdnimg.cn/20201014180756925.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
lisp
zhouqiang1990000815
这个作者很懒,什么都没留下…
展开
-
lisp小程序,useless
用于求T(n)期中T(n)= 1 (n = 1 时),T(n) = n + T(n-1)lisp code(defun trianguler (N) (if (= N 1) 1 (+ N (trianguler (- N 1)))))原创 2012-06-01 00:38:22 · 680 阅读 · 0 评论 -
sum (L)
对list求和code(defun resursive_sum (L) (if (null L) 0 (+ (first L) (resursive (rest L)))))原创 2012-06-01 13:20:05 · 362 阅读 · 0 评论