vb编程设计例题100例 用VB编写杨辉三角?
用VB编写杨辉三角?Option Base 1Private Sub form u click()Const n=10Dim arr(n,n)As Integer对于i=1到narr(i,i)=1ar
用VB编写杨辉三角?
Option Base 1
Private Sub form u click()
Const n=10
Dim arr(n,n)As Integer
对于i=1到n
arr(i,i)=1
arr(i,1)=1
Next i
对于i=3到n
对于j=2到i-1
arr(i,j)=arr(i-1,j-1)arr(i-1,j)
Next j
对于i=1到n
打印arr(i,j)
Nextj
打印
下一个我
结束订阅