Вычислить сумму нечетных элементов матрицы, расположенных на побочной диагонали - Pascal

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

Листинг программы

if not(odd(arr1[i][n - i + 1]))

Объяснение кода листинга программы

Переменная arr1 - матрица, содержащая элементы.
Переменная i - индекс строки, используемый в цикле.
Переменная n - количество строк (или столбцов) в матрице.
Выражение arr1[i][n - i + 1] - обращение к элементу матрицы, который расположен на побочной диагонали (строка i, столбец n - i + 1).
Функция odd() - проверяет, является ли число нечетным.
not - оператор логического отрицания, который применяется к результату функции odd(arr1[i][n - i + 1]). Итак, выражение if not(odd(arr1[i][n - i + 1])) проверяет, является ли значение элемента матрицы на побочной диагонали нечетным, и если это так, то выполняет соответствующие действия.