задача в паскали

[uHkBu3uTop]

вычислить сумму элементов матрицы А(5х5) расположенных над главной диагональю (i<j)

[whatever]

sum:=0;
for i:=1 to 4 do
  for j:=i+1 to 5 do
    sum:=sum+A[i,j];