作业帮 > 综合 > 作业

0到9 随便选5个数相加等于22 这样的组合有多少

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/17 09:17:31
0到9 随便选5个数相加等于22 这样的组合有多少
数字可以重复!
1楼的肯定不全了
打开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)