儿童储存罐:编程问题！！

来源：百度文库编辑：高校问答时间：2024/04/28 00:54:14

输入一个数：4 然后输出所有的4的组合方式（整数）：
4： 3 1
2 2
2 1 1
1 1 1 1
编一个程序，输入一个<20的数，然后输出所有的组合！！

谢谢您.如果您会.请你帮我解决一下.非常感谢你.

Private Sub Command1_Click()
Dim n As Integer, j As Integer, i As Integer
n = Val(Text1)
For i = 1 To n
For j = 1 To n
If i + j = n Then

Print i, j
End If
Next j
Next i

End Sub

楼上的算法是可以进行的，但可以优化

编程问题编程问题编程问题编程问题编程问题编程问题？？编程问题编程问题编程问题编程问题编程问题！编程问题

儿童储存罐:编程问题 ！！

儿童储存罐:编程问题！！