Imports System  

Public Module Suma

    Public Sub Main()

        Dim num(5) as integer

        Dim x as integer

        Dim suma as integer

        For X=0 to 4

        Console.WriteLine("Da un numero")

        num(x)=Console.ReadLine

    Next x

    suma=num(0)+num(1)+num(2)+num(3)+num(4)

    Console.WriteLine("la suma es")

    Console.WriteLine(suma)

End sub

​

End Module