VB编程:for循环输出杨辉三角
运行效果:
程序代码:
- Private Sub Command1_Click()
- Dim a()
- n = 10 'Val(Text1.Text)
- Me.Cls
- ReDim a(n + 1, n + 1)
- For i = 1 To n
- For j = 0 To i
- a(1, i) = 1
- a(i, i) = 1
- a(i + 1, j + 1) = a(i, j) + a(i, j + 1)
- Print a(i, j);
- Next j
- Print
- Next i
- End Sub
学习总结:
算法的五大特性:
1、有穷性
2、确定性
3、可行性
4、输入
5、输出