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 · 672 阅读 · 0 评论 -
sum (L)
对list求和 code (defun resursive_sum (L) (if (null L) 0 (+ (first L) (resursive (rest L)))))原创 2012-06-01 13:20:05 · 358 阅读 · 0 评论