[РЕШЕНО][Pascal] Отоборазить матрицу относительно побочной диагонали. Не отображает.

[Sysel]

Подскажите, в чем проблема, уже битый час не могу понять где ошибка.
Дана некоторая матрица:

Aij: array of array of double;

После ввода размерности, ее строкам и столбцам присваивается длинна:

  SetLength(Aij,N);
  for i:=0 to N-1 do
    SetLength(Aij[i],N);

И матрица заполняется по определенному закону.

Допустим, у нас есть матрица:

Сформирована матрица Aij:
100 144 196 256 324
400 484 576 100 144
196 256 324 400 484
576 100 144 196 256
324 400 484 576 100

С помощью данного кода отображаем матрицу:

  writeln('Меняем местами области матрицы согласно рисунку:');
    for i:=0 to N-1 do
      for j:=0 to N-1 do
        begin
        temp := Aij[i,j];
        Aij[i,j] := Aij[N-i-1,N-j-1];
        Aij[N-i-1,N-j-1] := temp;
        end;
  print(Aij);

Но на выходе имеем:

Меняем местами области матрицы согласно рисунку:
100 144 196 256 324
400 484 576 100 144
196 256 324 400 484
576 100 144 196 256
324 400 484 576 100

Причем при отладке, внутри цикла он ее отображает, но как только выходит из цикла - значение остаются прежними.
Что я делаю не так? Не могу понять.

Решение:

Проблема решена, можно закрывать.
Два раза менял относительно диагонали числа, и по сути они вставали на свои места)