Imports System

Public Module Module1

    Dim num1 as Integer

    Dim num2 as Integer

    Dim num3 as Integer 

    Dim Result As Integer 

    Dim Result2 As Integer 

    Public Sub Main()

        Console.WriteLine("enter your 1st number")

        num1 = Console.ReadLine()

        console.writeline("Please Enter your 2nd Number")

        num2 = console.readline()

        Console.writeline("please Enter your 3rd Number")

        num3 = console.readline 

        Console.writeline(num1 + num2 + num3)

        Result = console.readline 

        Console.writeline((num1 + num2 + num3) / 3)

        Result2 = console.readline  

        Result2 = console.readline 

    End Sub

End Module