10. Что будет результатом выполнения фрагмента программы на языке программирования TurboPascal:
S := 0;
For i := 1 to n do For j := 1 to n do
ifi + j < n + 1
then S := S + a[i, j];
(Опишите словами, например, результатом будет количество четных элементов в каждом столбце квадратной матрицы)