Ребят, помогите, проблемка небольшая.

Дана целочисленная матрица размаром 6*9, найти матрицу получающуюся из данной перестановкой столбцов: первого с последним, второго с предпоследним и т.д.

1) Генерируем матрицу рандомом
2) Сама перестановка.
Пробовал несколько способов, никак не сходится что-то

Если не трудно, подскажите идею или алгоритм

FAQ : как задать матрицу чтобы поменять ...

for i := 1 to n div 2 do
... меняешь столбец i со столбцом n - i + 1

где n - число столбцов

создаешь массив

matrica: array [1..6,1..9] of longint;
stolbec1 : array [1..9] of longint;
stolbec2 : array [1..9] of longint;
var i,j : longint;
...
for I := 1 to 4 do begin
  for J:= 1 to 6 do 
  stolbec1[j]:=matrica[i,j];
 for j:= 1 to 6 do 
matrica[i,j]:=matrica[i,9-j+1];
 for j:= 1 to 6 do
matrica[i,9-j+1]:=stolbec1[j];
...
end;

Ты что первый день на форуме ? Во первых ТЕГИ а во вторых ... FAQ НЕ для красоты пишется
klem4

Спасибо klem4, спасибо arhimag!
Забыл совсем про FAQ! Исправлюсь.