php显示n行的杨辉三角,VB.Net的问题,输入整数n,显示具有n行的杨辉三角形.输入整数n,显示具有n行的杨辉三角形.提示：定义一个二维数组,数组大小由文本框中输入的大小n确定.对下三角各元素进行...

参考：

以下为十行的杨辉三角输出,根据这个自己做相应修改,都做好了,那你就是伸手党了.

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim i, j As Integer

Dim n As Integer

n = 10

Dim dete(n, n) As Integer

Dim sum As Integer

For i = 0 To n

For j = 0 To i

If i = 0 Then

dete(i, j) = 1

ElseIf j = 0 Then

dete(i, j) = 1

ElseIf i = j Then

dete(i, j) = 1

Else

dete(i, j) = dete(i - 1, j - 1) + dete(i - 1, j)

End If

Next

Next

For i = 0 To n

For j = 0 To i

Debug.Write(dete(i, j) & " ")

sum += dete(i, j)

Next

Debug.WriteLine(" ")

Next

End Sub

End Class

作业帮用户

2016-12-13

举报