Clojure编写一个阶乘程序 使用递归

这是递归

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

原文地址:https://www.cnblogs.com/or2-/p/3344141.html