Imports System

Public Module Module1

    Public Sub Main()

        'VARIABLES

        Dim num as Integer

        Dim total as Integer = 0

        Dim average as Double

        Dim high as Integer = 0

        Dim low as Integer = 999999999

        Dim range as Integer

        Dim many as Integer

        'INPUT

        Console.WriteLine("How Many Numbers would you like to input?")

        many = console.readline()

        'LOOP

        for i = 1 to many

            Console.WriteLine("Input a Number Below:")

            num = console.readline()

            total = total + num

        'IF

        if num > high then

            high = num

        End if

        If num < low then

            low = num

        end if

    next

        'OUTPUT

        Console.WriteLine("The total is: " & total)

        average = total/2

        Console.WriteLine("The Average is: " & average)

        Console.WriteLine("The Biggest number is: " & high)

        Console.WriteLine("The lowest number is: " & low)

        range = high - low

        Console.WriteLine("The range is: " & range)

​

End Sub

End Module