по заданой матрице построить вектор из масимумов диагоналей

[teno]

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

я понимаю как найти максимальный элемент строки,диагоали,но не могу понять как сформулировать условие тех кто ниже ее диагоналей и выше((( запуталась,помогите пожалуйста с программой!

[rubius2008]

for k:=1 to n-1 do 
  for i:=1+k to n do write(a[i,i-k]);

это так по элементам под гл. диаг. можно пройтись, а как над - подумай тут не сложно, распиши в тетрадке какие элементы (с индексами) должны перебираться и все станет на свои места