介绍几个简单/经典的递归/循环迭代计算过程：

香川群子

1. Sub test()
   
2.     MsgBox dgSum(100) & vbCr & ddSum(100)
   
3.     MsgBox dgFct(10) & vbCr & ddFct(10) & vbCr & dgFct1(10)
   
4.     MsgBox dgBin(123) & vbCr & ddBin(123)
   
5. End Sub
   
6. 
   
7. Function dgSum(n&) '递归求Σn、即1-n的总和
   
8.     If n Then dgSum = dgSum(n - 1) + n
   
9. End Function
   
10. Function ddSum(n&) '对比：循环求1-n的总和
    
11.     For n = n To 1 Step -1
    
12.         ddSum = ddSum + n
    
13.     Next
    
14. End Function
    
15. 
    
16. Function dgFct(n&) '递归求阶乘n!、即1-n的连续乘积
    
17.     If n Then dgFct = dgFct(n - 1) * n Else dgFct = 1
    
18. End Function
    
19. Function ddFct(n&) '对比：循环计算1-n的连续乘积n!
    
20.     ddFct = 1
    
21.     For n = n To 1 Step -1
    
22.         ddFct = ddFct * n
    
23.     Next
    
24. End Function
    
25. Function dgFct1(n&) '递归方法-2 实质相同
    
26.     If n = 1 Then dgFct1 = 1 Else dgFct1 = dgFct1(n - 1) * n
    
27. End Function
    
28. 
    
29. Function dgBin(n&) '递归把正整数n拆分为二进制数
    
30.     If n Then dgBin = dgBin(Int(n / 2)) & n Mod 2
    
31. End Function
    
32. Function ddBin(n&) '对比：循环迭代计算把正整数n拆分为二进制数
    
33.     While n
    
34.         ddBin = n Mod 2 & ddBin
    
35.         n = Int(n / 2)
    
36.     Wend
    
37. End Function

复制代码

呵呵，初学者仔细观察、总结一下规律，有助于理解递归计算的特点。

Vicel

学习下递归算法

香川群子

递归和循环的不同：

循环是通过一步一步的计算得到中间结果，并逐步更新，到最后一步就得到了最终结果。

而递归不同，例-1和例-2，是需要一层一层往下搜索，直到退出/结束条件时，才开始产生中间结果，
然后再一步一步返回，此时才产生/得到中间结果，直至退出到第1层才是结束，返回结果。

但例-3求二进制数时，却也能一步一步得到计算结果，但仍需逐步退出直至结束。呵呵。

aman1516

学习理解一下，未会实际应用......

下标越界

购买了算法导论第三版，可以缓慢学习了。

yiyiyicz

继续，多来几个实际应用的实例代码
谢谢先！

逍遥秀才ONLY

好吧，这个数学太差了，学这个感觉好费劲啊！

Albert128

递归是不是有点类似于单变量求解,若有求保本销售额的例子就好啦

zhouzhongchi

留个脚印，以便后查学习消化

jsgj2023

下标越界 发表于 2015-5-23 22:43
购买了算法导论第三版，可以缓慢学习了。

向老师请教,如何才能看懂算法导论?