Матрица Опции

[die]

Здраствуйте помогите решить программку . Дана матрица размера M × N (N — четное число). Поменять местами левую и правую половины матрицы.

[Lapp]

Дана матрица размера M × N (N — четное число). Поменять местами левую и правую половины матрицы.

Типа так:

k:=n div 2;
for i:=1 to m do for j:=1 to k do begin
  b:=a[i,j];
  a[i,j]:=a[i,j+k];
  a[i,j+k]:=b
end;