递归算法的一般形式

爱疯

zopey 发表于 2019-3-8 16:49
递归是一种逻辑思想，将一个大工作分为逐渐减小的小工作 ，当工作量足够小的时候，就要动手去完成它（终止 ...

谢谢 zopey ！

的确，这是递归的思想
希望这次能学会高手们的方法

爱疯

不知2层循环最容易理解的，但不必是最好的递归写法，是怎么写的

microyip

循环不一定要用到的，因为递归逻辑里没有需要循环的地方，只是一般大多数的递归搜索计算都是用循环对比来解决而已。
递归的重点就是判断结束，判断到之后，返回就是了，用Exit可以返回，所以不一定要用到Else

爱疯

Sub test2()
    Call dg(1)
End Sub

Sub dg(i)
    If i > 5 Then
        Exit Sub
    Else
        Debug.Print i
        Call dg(i + 1)
    End If
End Sub


和9楼，10楼效果一样，只是模样更像些1楼形式

micch

http://club.excelhome.net/forum. ... 531&pid=7806716

推荐看看香川老师的递归帖子，搜能搜到很多，也有讲基础的，也有比较高深的

爱疯

micch 发表于 2019-3-8 18:34
http://club.excelhome.net/forum.php?mod=redirect&goto=findpost&ptid=1145531&pid=7806716

推荐看看 ...

谢谢 micch ！
群子老师以及高手们的答案虽好，但我还没找到觉得好理解的
我再想，再找

micch

爱疯 发表于 2019-3-8 18:46
谢谢 micch ！
群子老师以及高手们的答案虽好，但我还没找到觉得好理解的
我再想，再找

我看了应该有一个月了，一直理解不了，不过刚刚这个链接是我唯一能理解的一个，练习了几次了。

我的方法是，如果能理解n选m的数组循环，再理解递归就好一点。
for a = 1 to 6
for b = 2 to 7
for c =  3 to 8
for d = 4 to 9
      s=a+ b +c +d
next d,c,b,a

4层循环，可以直接用递归循环代替

小花鹿

学递归应该找一个合适的例子，下面这个例子就很好：

爱疯

小花鹿 发表于 2019-3-8 21:02
学递归应该找一个合适的例子，下面这个例子就很好：

谢谢 小花鹿！

我觉得这是一个好的应用例子，但对学习的节奏来说
有跳过了的感觉，跳过了些该理解而没讲到的环节。就像听懂了第1第2节，但没听到第3第4节，就抛出了第5节的课了。

爱疯

Sub test4()
    Call dg4(1, 1)
End Sub
'递归，2层for
Sub dg4(i, j)
    Debug.Print i, j
    If j < 5 Then Call dg4(i, j + 1):  Exit Sub
    If i < 5 Then j = 1: Call dg4(i + 1, j)
End Sub



Sub test5()
    Call dg5(1, 1, 1)
End Sub
'递归，3层for
Sub dg5(i, j, k)
    Debug.Print i, j, k
    If k < 5 Then Call dg5(i, j, k + 1): Exit Sub
    If j < 5 Then k = 1: Call dg5(i, j + 1, k): Exit Sub
    If i < 5 Then j = 1: Call dg5(i + 1, j, k)
End Sub


虽然达到了题目要求，但显然随着嵌套层次增加，递归程序就会越来，越长、复杂，即不通用。