vb编程设计例题100例 用VB编写杨辉三角？

用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

打印

下一个我

结束订阅

vb编程设计例题100例 vb编写程序输出杨辉三角 杨辉三角vb代码等腰三角形

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。