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
打印
下一個我
結束訂閱