level 0
05273251
楼主
帮我看看下面那段打印杨辉三角的代码有什么错误啊Dim i As Integer, j As Integer, a() As Integer, n As Integern = InputBox("输入n")ReDim a(n, n)For i = 1 To n a(i, 1) = 1 a(i, i) = 1Next iFor i = 3 To n For j = 2 To i - 1 a(i, j) = a(i - 1, j - 1) + a(i - 1, j) Next jNext iFor i = 1 To npicture1.Print Space(3 * (n - 1)); For j = 1 To i picture1.Print a(i, j); " "; Next j picture1.Print ;Next i
2006年05月06日 02点05分
1