Question

How to calculate the sum of first N natural numbers in VB.NET

Answer 1

Module Module1

    ' 1 + 2 + 3 + 4 + ... + N

    Sub Main()

        Dim n As Integer = 10, sum As Integer = 0

        While (n > 0)
            sum += n
            n -= 1
        End While

        Console.WriteLine("The sum is: {0}", sum)

    End Sub

End Module

' run:
' 
' The sum is: 55

 

70+ SQL courses for beginners and professionals

Answer 2

Module Module1

    ' 1 + 2 + 3 + 4 + ... + N

    Sub Main()

        Dim n As Integer = 10, sum As Integer = 0

        sum = n / 2 * (n + 1)

        Console.WriteLine("The sum is: {0}", sum)

    End Sub

End Module

' run:
' 
' The sum is: 55

 

70+ SQL courses for beginners and professionals