您的位置:首页 > 其它

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))
)

)

)
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐