发布时间:2019-09-13 21:22:59
比如4+12+13+22+27+29+16=123除了这一组可以等于123 那还有多少数字相加等于123呢、聪明的你解答一下吧?不要太复杂了 就数字加起来就可以了。等你们的答案
比如4+12+13+22+27+29+16=123除了这一组可以等于123 那还有多少数字相加等于123呢、聪明的你解答一下吧?不要太复杂了 就数字加起来就可以了。还有等于51多少组;等于53多少组.等于55多少组.等于57多少组.等于59多少组.等于61多少组.等于63多少组.等于65多少组.等于67多少组.等于69多少组.等于71多少组.等于73多少组.等于75多少组.等于77多少组.等于79多少组.等于81多少组.等于83多少组.等于85多少组.等于87多少组.等于89多少组.等于91多少组等于93多少组.等于95多少组.等于97多少组.等于99多少组.等于101多少组.等于103多少组.等于105多少组.等于107多少组.等于109多少组.等于111多少组.等于113多少组.等于115多少组.等于117多少组.等于119多少组.等于121多少组.等于123多少组.等于125多少组.等于127多少组.等于129多少组.等于131多少组.等于133多少组.等于135多少组.等于137多少组.等于139多少组.
等于51的共有618组。
要计算123、或其它数据,将代码中的51修改成123、或其它数据即可。
代码:
Sub 求51()k = 1For i1 = 1 To 27 For i2 = i1 + 1 To 28 For i3 = i2 + 1 To 29 For i4 = i3 + 1 To 30 For i5 = i4 + 1 To 31 For i6 = i5 + 1 To 32 For i7 = i6 + 1 To 33 If i1 + i2 + i3 + i4 + i5 + i6 + i7 = 51 Then Cells(k, 1) = i1 Cells(k, 2) = i2 Cells(k, 3) = i3 Cells(k, 4) = i4 Cells(k, 5) = i5 Cells(k, 6) = i6 Cells(k, 7) = i7 k = k + 1 End If Next Next Next Next Next NextNextEnd Sub
去找数学大师吧,话说我数学高考差点没及格
你是在算双色球吧??