Question

How to calculate and print the Pascal triangle in VB.NET

Answer 1

Imports System

Public Class Test
    Public Shared Sub Main()
        Dim n As Integer = 5
       
        For i As Integer = 0 To n
            Dim number As Integer = 1
            For j As Integer = 0 To (n - i) * 2
               Console.Write(" ")
            Next 
            For j As Integer = 0 To i
               Console.Write("{0, 4}", number)
               number = number * (i - j) / (j + 1)
            Next
            Console.WriteLine()
        Next
        
    End Sub
End Class



' Run:
'
'               1
'             1   1
'           1   2   1
'         1   3   3   1
'       1   4   6   4   1
'     1   5  10  10   5   1

 

70+ SQL courses for beginners and professionals