Действия над массивами. Pascal

Математическая постановка задачи:

f[i, j] := (abs(3.7-j)-2)*(i-4.3)*exp(i*ln(2));
...
Листинг программы

Program Lab2;
Uses
CRT;
Const
n = 6; {kolich strok i stolbcov}
Label
M1;
Var
i, j, flag: integer;
T, max: real;

Цель: Практика в использовании возможностей АЯ для действий над массивами.

Вывод

Научился использовать возможности АЯ для действий над массивами.
Результаты полученные в ходе работы программы совпадают с теми, что были подсчитаны вручную с помощью калькулятора. Это может свидетельствовать правильной работоспособности программы и алгоритма. Программа выполняет вычисление элементов квадратной матрицы А по заданному правилу, упорядочивает по убыванию сумму среднеарифметические значения элементов строк матрицы А и из упорядоченной матрицы находит значение U по функции φ (x).

Задание - в снимке прилагается. *.jpg
В работе содежится исходный код, описан математический алгоритм + графическая блоксхема.