Clojure编写一个阶乘程序 使用递归
2013-09-28 12:57
357 查看
这是递归
(def f
(fn fb
[x]
(if (< x 2)
1
(* x (fb (- x 1)) )
)
)
)
(def f
(fn fb
[x y]
(if (= x 1)
y
(fb (- x 1) (* x y))
)
)
)
(def f
(fn fb
[x]
(if (< x 2)
1
(* x (fb (- x 1)) )
)
)
)
(def f
(fn fb
[x y]
(if (= x 1)
y
(fb (- x 1) (* x y))
)
)
)
相关文章推荐
- 编写查找一个单链表特定元素的程序。分别使用递归和非递归方法实现,并比较它们的运行时间。
- 使用TCP协议编写一个网络程序,设置服务器端的监听端口是8002,当与客户端建立连接后,服务器端向客户端发送数据“Hello, world”,客户端收到数据后打印输出。
- Js 学习 使用js arguments 写一个 多态overload 的小程序。 js 闭包写一个10的阶乘的算法
- 一只程序猿的养成日记 第一章 第十一节 编写一个函数实现n^k,使用递归实现
- 使用C#编写的一个定时关机程序
- 编写一个函数,接受三个string参数,s,oldVal和newVal。使用迭代器及insert和erase函数将s中所有oldVal替换为newVal。测试你的程序,用他替换通用的简写形式,如,将“tho”,将“”“”
- 编写一段程序,从标准输入读取string对象的序列直到连续出现两个相同的单词或者所有单词都读完为止。使用while循环一次读取一个单词,当一个单词连续出现两次是使用break语句终止循环。输出连续重复出现的单词,或者输出一个消息说明没有人任何单词是重复出现的。
- 0301使用open函数编写一个程序
- 编写一个程序,使用fork函数来创建一个子进程,并分别输出父子进程的进程ID
- 使用C#编写的一个定时关机程序
- 使用TCP协议编写一个网络程序,设置服务器端的监听端口是8002,当与客户端建立连接后,服务器端向客户端发送数据“Hello, world”,客户端收到数据后打印输出。
- 使用IAR embedded workbench for MCS-51编写的一个示例程序
- 6_8_2编写一个应用程序,该程序使用2个命令行参数,分别把值放在一个字符串和一个整形变量中,然后显示这些值
- 编写一个程序,使用两个命令行参数,分别把值放在一个字符串变量和一个整型变量中,然后显示这些值。
- 【C语言】编写一个函数实现n^k,使用递归实现
- 一个使用JAVA编写的类似按键精灵的程序,支持脚本文件编写(含源代码)
- 【C语言】【面试题】【笔试题】编写一个函数实现n^k,使用递归实现
- 一个使用JAVA编写的类似按键精灵的程序,支持脚本文件编写(含源代码)
- 如何使用Python为Hadoop编写一个简单的MapReduce程序(这个人T字还有好几篇精华的可以看)
- Servlet学习笔记_03_使用servlet编写一个简单的helloworld程序