Зеркальное отражение матриц, (диагонали и оси симметрии) Опции

[TBVlad]

Хотелось бы поточнее разобраться в алгоритме зеркального переворота матриц относительно побочной диагонали и вертикальной оси симметрии.
Если уже разбиралось, ткните носом, плиз...

[klem4]

Главная.
Побочная по аналогии

const
   n = 4;
type
  TMx = array [1..n,1..n] of integer;

// ...

procedure Mirror(var mx : TMx);
var
   i,j : byte;
   T : integer;
begin
   for i := 2 to n do
    for j := 1 to i - 1 do begin
       T := mx[i,j];
       mx[i,j] := mx[j,i];
       mx[j,i] := T;
    end;
end;