Помогите решить задачу. Для матрицы создать следующие функции.

[алина 11]

cоnst n=10;
type matr= array[0..n, 0..n] of integer;
Для матрицы создать следующие функции.

1.Max (A: matrix): integer; определяющую максимальный элемент матрицы в заштрихованной области.

•••••••
•••••
•••
•
•••
•••••
•••••••
2. TEST(A,k): Boolean; принимающую значение True, если: k-я строка симметрична.

[InfStudent]

Общий алгоритм:
Заметим что каждая следующая строчка содержит элемент на один меньше
Далее насчет  сравнения: последовательно сравнивая каждый элемент строки со следующим, мы найдем максимальный элемент каждой строки. Далее сравнивая максимумы двух соседних строк мы находим наибольший и  дальше сравниваем с ним.
Для правильного обхода массива двумерного применяем вложенные циклы
вида:
for i:=1 to 4 do
begin
for j:=1 to 8-i do
begin
end;
end;