Imports System

Public Module Module1

    Public Sub Main()

        dim arr(9),x as decimal

        dim oRand as new random

        for i = 0 to 9

        arr(i) = oRand.Next(0,100)

    Console.WriteLine(arr(i))

    x = x + arr(i)

next

console.WriteLine(x)

    End Sub

End Module