32. Выделение элементов, стоящих на главной диагонали, выше или ниже нее.

Вывести на экран элементы матрицы B(N, N), расположенные на

главной диагонали и ниже ее (зоны 4, 5, 6, 7)

For iAs Integer = 1 To N

For j As Integer = 1 To N

If i>= j Then Console.Write(B(i, j) &" ")

Next j

Console.WriteLine()

Next i

Условия относительно горизонтальной и вертикальной лииий разделения

просты: слева и справа от горизонтальной линии j < X, j > X, где X — номер

столбца; выше и ниже горизонтальной линии i < X, i > X, где X — номер строки.

Если требуется обработать одну или несколько зон, то нужно применять

составные условия. Например, зона 1 (при нечетномN) описывается так: j >= N\2

+ 1 AND i <= N - j + 1. Условие j >= N \ 2 + 1 выделяет все элементы справа от цен-

трального столбца матрицы, а условие i <= N - j + 1 — элементы выше побочной

диагонали, то есть в условии должны быть описаны линии, ограничивающие

данную область (табл. 1).

Таблица 1. Сводная таблица условий при работе с зонами квадратной матрицы

Область Условие

Главная диагональ i = j

Выше главной диагонали, включая элементы

на ней

i <= j

Выше главной диагонали, не включая

элементы на ней

i < j

Ниже главной диагонали, включая элементы

на ней

i >= j

Ниже главной диагонали, не включая

элементы на ней

i > j

Побочная диагональ i = N - j + 1

Выше побочной диагонали, включая

элементы на ней

i <= N - j + 1

Выше побочной диагонали, не включая

элементы на ней

i < N - j + 1

Ниже побочной диагонали, включая

элементы на ней

i >= N - j + 1

Ниже побочной диагонали, не включая

элементы на ней

i > N - j + 1

Зона 1 (включая элементы на ней) j >= N\2 + 1 And i <= N - j + 1

Зона 2 (включая элементы на ней) i <= N\2 + 1 And i >= N - j + 1

Зона 3 (включая элементы на ней) i >= N\2 + 1 And i <= j

Зона 4 (включая элементы на ней) j >= N\2 + 1 And i >= j

Зона 5 (включая элементы на ней) j <= N\2 + 1 And i >= N - j + 1

Зона 6 (включая элементы на ней) i >= N\2 + 1 And i <= N - j + 1

Зона 7 (включая элементы на ней) i <= N\2 + 1 And i >= j

Зона 8 (включая элементы на ней) j >= N\2 + 1 And i <= j

Зоны 8 и 1 (не включая элементы на ней) i < j And i < N - j + 1

Зоны 2 и 3 (не включая элементы на ней) i < j And i > N - j + 1

Зоны 4 и 5 (не включая элементы на ней) i > j And i > N - j + 1

Зоны 6 и 7 (не включая элементы на ней) i > j And i < N - j + 1

33. Выделение элементов, стоящих на побочной диагонали, выше или ниже нее.