求从0到9任选5个数(可以重复),5个数相加等于22的所有组合!
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/21 21:09:42
求从0到9任选5个数(可以重复),5个数相加等于22的所有组合!
没看明白,我要求列出所有的组合,不是求共多少种.
没看明白,我要求列出所有的组合,不是求共多少种.
打开VB程序 或者打开EXCEL利用控件使用VBA
输入下面的程序 穷举a+b+c+d+e=22 的所有组合
如果1+5+7+9和1+7+5+9看做是不同的那么 共计6000种
i = 0
For i1 = 0 To 9
For i2 = 0 To 9
For i3 = 0 To 9
For i4 = 0 To 9
For i5 = 0 To 9
If ((i1 + i2 + i3 + i4 + i5) = 22) Then i = i + 1
Next i5
Next i4
Next i3
Next i2
Next i1
MsgBox (i)
如果1+5+7+9和1+7+5+9看做是相同的那么 共计102种
i = 0
For i1 = 0 To 9
For i2 = 0 To 9
For i3 = 0 To 9
For i4 = 0 To 9
For i5 = 0 To 9
If (((i1 + i2 + i3 + i4 + i5) = 22) And (i1 < i2) And (i2 < i3) And (i3 < i4) And (i4 < i5)) Then i = i + 1
Next i5
Next i4
Next i3
Next i2
Next i1
MsgBox (i)
102
输入下面的程序 穷举a+b+c+d+e=22 的所有组合
如果1+5+7+9和1+7+5+9看做是不同的那么 共计6000种
i = 0
For i1 = 0 To 9
For i2 = 0 To 9
For i3 = 0 To 9
For i4 = 0 To 9
For i5 = 0 To 9
If ((i1 + i2 + i3 + i4 + i5) = 22) Then i = i + 1
Next i5
Next i4
Next i3
Next i2
Next i1
MsgBox (i)
如果1+5+7+9和1+7+5+9看做是相同的那么 共计102种
i = 0
For i1 = 0 To 9
For i2 = 0 To 9
For i3 = 0 To 9
For i4 = 0 To 9
For i5 = 0 To 9
If (((i1 + i2 + i3 + i4 + i5) = 22) And (i1 < i2) And (i2 < i3) And (i3 < i4) And (i4 < i5)) Then i = i + 1
Next i5
Next i4
Next i3
Next i2
Next i1
MsgBox (i)
102
求从0到9任选5个数(可以重复),5个数相加等于22的所有组合!
0到9 随便选5个数相加等于22 这样的组合有多少
1到22之间任意5个数相加等于60的组合有多少(数和数不要重复的)
0到9随便选5个数相加等于11这样的组合有多少
1到22之间任意5个数相加等于52的组合有多少(数和数不要重复的)最好把这些数列列出来
从0到9任意两个数相加等于第三个数(不能重复)
从1到9任意选9个数(可重复),相加等于55,请问有公式可以算吗?
0到9 随便选7个数相加等于30 这样的组合有多少
1到20任意5个数相加等于50的组合有多少?
0-9任意5个数相加等于16;26;36的所有可能性
怎么算1到35中5个数不重复相加等于70到130之间
如果有10个数,从其中选5个数,不重复的选有几种选法的组合数?