Как вывести матрицу в консоль? - Visual Basic .NET
Формулировка задачи:
Первый раз затронул VB, очень нуждаюсь в примере правильного кода.
Дана матрица А, состоящая из n строк и n столбцов.
Сию матрицу, скажем, вот такую: 1 4 6 -2 3 9 -1 0 -5, надо вывести на экран. Затем проделать следующее:- создать линейный массив (условно с элементами X1,...,Xn)
- посчитать построчно среднее арифметическое всех
положительных
элементов, сохраняя значение в Xi - если положительных элементов нет, присвоить значение -1
Решение задачи: «Как вывести матрицу в консоль?»
textual
Листинг программы
Dim a(,) As Integer = {{1, 4, 6}, {-2, 3, 9}, {-1, 0, -5}} 'можешь создать любой массив любым способом, все будет работать!
Dim x(UBound(a)) As Double
Dim sa As Double = 0
Dim n As Integer = 0
For i = 0 To UBound(a, 1)
For j = 0 To UBound(a, 2)
Console.Write("{0} ", a(i, j))
If a(i, j) > 0 Then
n += 1
sa += a(i, j)
End If
Next
If sa > 0 Then
x(i) += sa / n
n = 0
sa = 0
Else
x(i) = -1
End If
Console.WriteLine()
Next
Console.WriteLine(String.Join("; ", x))
Console.ReadKey()