'Ben Mizrahi 

'5/25/21

'Random values array 

Imports System

Public Module Module1

    Public Sub Main()

    'declaring variables 

        dim array(8, 4) as integer 

        dim values as new Random 

        dim output as string 

    'assigning values to the array 

        For r as integer = 0 to array.GetUpperBound(0) - 1

            For c as integer = 0 to array.GetUpperBound(1) - 1

                array(r,c) = values.Next(1,100)

        output += array(r, c) & ", " 

            Next

        Next

​

​

    'generating the output

        console.writeline(output)

​

    End Sub

End Module