dim grades(,) as integer = { {83, 75, 80, 88, 77},
dim names() as string= {"Aaron", "Baruni", "Carlos", "Desiree", "Elan"}
For c as integer = 0 to grades.GetUpperBound(1)
For r = 0 to grades.GetUpperBound(0)
Console.WriteLine("The average for " & names(c) & " is " & Math.Round(avg/3,0))