Imports System

Public Module Module1

    Public Sub Main()

        'Declare variables

        dim number1 as integer

        dim number2 as integer

        dim number3 as integer

        dim number4 as integer

        dim number5 as integer

        dim total as integer

        dim mean as integer

        Console.WriteLine("type in number1")

        number1=Console.ReadLine()

        Console.WriteLine("type in number2")

        number2=Console.ReadLine()

        Console.WriteLine("type in number3")

        number3=Console.ReadLine()

        Console.WriteLine("type in number4")

        number4=Console.ReadLine()

        Console.WriteLine("type in number5")

        number5=Console.ReadLine()

        total= number1 + number2 + number3 + number4 + number5

        mean= total/5

        Console.WriteLine("mean of 5 numbers" & "=" & mean)

    End Sub

End Module