Module vbPiramid
Sub Main()
Dim i As Integer
Dim j As Integer
Dim k As Integer
Dim l As Integer
j = 0
For i = 0 To 10
l = 0
For k = 0 To j
Console.Out.Write(l.ToString() + " ")
l = l + 1
Next
Console.Out.WriteLine("")
If (i < 5) Then
j = j + 1
Else
j = j - 1
End If
Next
Console.Read()
End Sub
End Module
New Article
อัตราค่าโฆษณา
สร้าง พีระมิด โดย ใช้ for ด้วย vb.net
(อ่าน 13,464)
: ดาว์นโหลดไฟล์เฉลย
รับพัฒนาโปรแกรม และเว็บ โดย 9'M
สร้าง พีระมิด โดย ใช้ for ด้วย vb.net
