手动实现多分类adaboost算法_VB用穷举法来解决多可能问题算法实现

更多算法问题：

求阶乘之和 | 求1！+2！+...+20！之和如何编程实现？

VB编程实际算法之求解1+1/2!+1/3!+.....+1/n!之和问题

算法|VB中的相亲数问题如何解决？

穷举法简介

穷举法的基本思想是根据现实问题，列举出所有的情况，并且用题目中指定的条件来检验。

穷举法适用于解决多存在和多可能问题。

下面我们用求解不定方程的代码来带领大家认识一下穷举法的应用。

题目：将一张1元钞票换为1分、2分、5分硬币，每种至少8枚，问共有多少种换取方案？

代码如下：

---

Private Sub Form_Click()

Dim i As Integer, j As Integer, k As Integer

Dim count As Integer

    For i = 8 To 44

        For j = 8 To 26

            For k = 8 To 15

                If (i + j * 2 + k * 5 = 100) Then count = count + 1

            Next k

        Next j

    Next i

Print "共有："; count; "种方案"

End Sub

---

tips：有VB学习问题可以添加小编微信号：vbyjk521 ，随时在线答疑。

---

---

长按上图，关注跟我学VB公众平台