Imports System

Public Module Module1

    Public Sub Main()

        Dim arreglo(3) as integer

        arreglo(0) = Cint(Console.ReadLine())

        arreglo(1) = Cint(Console.ReadLine())

        arreglo(2) = Cint(Console.ReadLine())

        Console.WriteLine("El valor es {0}", arreglo(0))

        Console.WriteLine("El valor es {0}", arreglo(1))

        Console.WriteLine("El valor es {0}", arreglo(2))

    End Sub

End Module