admin管理员组文章数量:1794759
使用 Lisp 递归函数实现 斐波那契数列 Fibonacci
Lisp 递归函数实现
(defun fib (n) (if (<= n 1) 1 (+ (fib (- n 1)) (fib (- n 2)))))运行测试:
FIB * (fib 10) 89 * (fib 20) 10946 * (fib 30) 1346269 * (fib 40) 165580141版权声明:本文标题:使用 Lisp 递归函数实现 斐波那契数列 Fibonacci 内容由林淑君副主任自发贡献,该文观点仅代表作者本人, 转载请联系作者并注明出处:http://www.xiehuijuan.com/baike/1686490335a73376.html, 本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容,一经查实,本站将立刻删除。
发表评论