vb编程题取一元、二元、五元的硬币共23枚（每种硬币至少取1枚）,付给45元钱,有______种不同的取法.（仅回答有多

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/25 23:32:29

vb编程题
取一元、二元、五元的硬币共23枚（每种硬币至少取1枚）,付给45元钱,有______种不同的取法.（仅回答有多少种）
我要的是VB的编程

Option Explicit
Private Sub Form_Load()
Dim i As Long, j As Long, k As Long, c As Long
For i = 1 To 38
For j = 1 To 20
For k = 1 To 9
If i + j * 2 + k * 5 = 45 Then c = c + 1: Debug.Print c; ":", i, j, k
Next
Next
Next
MsgBox "请查看立即窗口! " & c & "种方法已经输出!", , ""
Unload Me
End Su

vb编程题取一元、二元、五元的硬币共23枚（每种硬币至少取1枚）,付给45元钱,有______种不同的取法.（仅回答有多小虎有1元,5角和1角的硬币各5枚,从中取6元钱,能有多少种不同的取法? 小明有一元和五角的硬币共13枚,这些硬币的总币值大于8.5元.问小明至少有多少枚一元的硬币? 明明有一角,五角,一元硬币各10枚,要取出1·5元,共有多少种不同的取法? （方程题,带解设）有30枚不同的硬币由5角和1元组成,共值20元,两种硬币各多少枚? 有一张五元硬币.四张两元.八张一元要拿出9元,共有多少种不同的取法有一角、五角、一元三种面值的硬币共56元,已知每种硬币的个数相等.三种硬币各有多少个? 小明有1元和5角的硬币共13枚这些硬币的总币值大于8.5元小名至少有多少枚1元的硬币有壹角,五角,一元三种面值的硬币共40元,已知每种硬币的个数相等,求三种硬币各有多少个? 有壹角,五角,一元三种面值的硬币共40元,已知每种硬币的个数相等,求三种硬币各有多少? 有1分,2分,5分三种硬币共10元,已知每种硬币的枚数相同,求三种硬币各有多少枚? 有一角、二角、五角三种硬币共十六元,已知每种硬币的个数相同,求三种硬币共有多少枚.