Двумерный массив

[St1mkA]

Дана квадратная матрица порядка n. С помощью допустимых преобразо¬ваний добиться того, чтобы один из элементов матрицы, обладающий наи¬меньшим по модулю значением, располагался в правом нижнем углу мат¬рицы. На¬зовем допустимым преобразованием матрицы перестановку двух строк и двух столбцов.

[Chudo4258]

Матрица: n строк и m столбцов.
Находим min:

min:=a[1,1];
i_min:=1;
j_min:=1;
for i:=1 to n do
 for j:=1 to m do
  if abs(a[i,j])<min then 
                            begin
                              i_min:=i;
                              j_min:=j;
                              min:=a[i,j];
                            end;

И так, нашли номер строки и номер столбца, где находится минимальный по мод. элемент.
Теперь строку с min элементом поменяем с последней:

for i:=1 to m do
begin
 t:=a[i_min,i];
 a[i_min,i]:=a[n,i];
 a[n,i]:=t;
end;

Теперь меняем столбец с номером j_min и последний:

for i:=1 to n do
begin
 t:=a[i,j_min];
 a[i,j_min]:=a[i,m];
 a[i,m]:=t;
end;

[St1mkA]

Спасибо огромное!! Выручил, респект!!