Imports System

Public Module Module1

    Public Sub Main()

        console.WriteLine("Enter 4 Jump Distances")

        dim jump1 as decimal = console.ReadLine()

        dim jump2 as decimal= console.ReadLine()

        dim jump3 as decimal= console.ReadLine()

        dim jump4 as decimal= console.ReadLine()

        dim average as decimal = Jump1 + jump2 + jump3 + Jump4 /4

        Console.WriteLine("Average Distance = " & average)

    End Sub

End Module