Imports System

Public Module Module1

    Public Sub Main()

        dim num as integer

        dim total as integer

        dim average as integer

     for i = 1 to 3

        console.writeline("enter a number")

        num = console.readline()

        total = num + total

​

     next

     average = total/3

     console.writeline("The total is " & total )

     console.writeline("the average is " & average )

    End Sub

End Module