Задана матрица Am*n . Найти максимальный по модулю элемент матрицы. Переставить строки и столбцы матрицы (в Delphi)

[Natashakosmos]

Помогите решить задачку в DELPHI
Задана матрица Am*n . Найти максимальный по модулю элемент матрицы. Переставить строки и столбцы матрицы таким образом, чтобы максимальный по модулю элемент был расположен на пересечении 1-й строки и 1-го столбца.

[type_Oleg]

  imax:=1;
  jmax:=1;
  maxA:=A[imax,jmax];
  for i:=1 to n do
   for j:=1 to m do
    if Abs(A[i,j])>Abs(maxA)then
      begin
       imax:=i;
       jmax:=j;
       maxA:=A[imax,jmax];
      end;

И потом меняйте местами нужный столбец с 1-м столбцом, потом нужную строку с 1-й строкой.

[Natashakosmos]

Спасибо огромное, но если бы я знала как это сделать, то было бы здорово)

[Serge_Bliznykov]

Сообщение от Natashakosmos

Спасибо огромное, но если бы я знала как это сделать, то было бы здорово)

А как можно помочь, не зная, что Вы знаете, как сделать, а что - нет!
Написать полностью всё за Вас?! Так это скучно, вредно, да и можно пальцев в небо попасть (напишешь в консоли, а Вам (неожиданно) на формах это сделать надо...)

приведите сюда Ваш код на Delphi, покажите в коде, как Вы заполняете массив, давайте свои наработки, расскажите, что конкретно не получается, будет повод для разговора...

А пока могу только пожелать успехов в учёбе!