VbNet 1----Programacion en Consola----Hallar Promedio de notas

Hallemos el promedio de 4 notas.

Module Module1
    Sub Main()
        Dim x, y, z, w, a As Double
        Console.Write("ingrese nota 1 :")
        x = Console.ReadLine
        Console.Write("ingrese nota 2 :")
        y = Console.ReadLine
        Console.Write("ingrese nota 3 :")
        z = Console.ReadLine
        Console.Write("ingrese nota 4 :")
        w = Console.ReadLine
        a = (x + y + z + w) / 4
        Console.Write("el promedio es:" & a)
        Console.Read()
    End Sub
End Module