Вывести месторасположения несимметричных элементов относительно побочной диагонали в заданной матрице - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Матрицу задал массивом n*n , не могу придумать код для поиска расположения несимметричных элементов относительно побочной диагонали.

Решение задачи: «Вывести месторасположения несимметричных элементов относительно побочной диагонали в заданной матрице»

textual
Листинг программы
MsgBox(String.Join("; ", getIJ(A)))
'…
Private Function getIJ(ByVal aa(,) As Integer) As String()
    Dim n As Integer = aa.GetLength(0)
    Dim bb As New List(Of String)
    For i = 0 To n - 2
        For j = 0 To n - 2 - i
            'определяем равные по значению и симметричные относительно побочной диагонали 
            'элементы матрицы и сохраняем их координаты
            If aa(i, j) = aa(n - 1 - j, n - 1 - i) Then bb.Add("(" & i & "," & j & ") (" & (n - 1 - j).ToString & "," & (n - 1 - i).ToString & ")")
        Next
    Next
    Return bb.ToArray
End Function

Оцени полезность:

7   голосов , оценка 4.286 из 5
Похожие ответы