Imports System

Public Module Module1

    Public Sub Main()

        dim x as integer

        dim y as integer 

        dim z as integer

        console.WriteLine("please enter your 3 numbers")

        y=console.ReadLine('x')

            console.writeline("take average is")

            console.WriteLine(x+y+z*0.333)

    End Sub

End Module