Imports System
Public Module Module1
Public Sub Main()
Dim nNumbers(4) as decimal
Dim i as integer
Console.WriteLine("5 Numbers please")
For i = 0 to 4
nNumbers(i) = Console.ReadLine()
Next
Console.Write(nNumbers (0) + nNumbers(1) + nNumbers(2) + nNumbers(3) + nNumbers(4) )
End Sub
End Module