Курсовая по двумерным массивам! - Pascal

Формулировка задачи:

1.Задана квадратная матрица. Переставить строку с макси¬мальным элементом на главной диагонали со строкой с заданным номером. 2.Заданы матрица (размером N*N) и число К (0<=K<N). Столбец с максимальным по модулю элементом в К-й строке пере¬ставить с К-м столбцом.

Решение задачи: «Курсовая по двумерным массивам!»

Листинг программы

  for i:=1 to n do
  begin
    j := a[i,l];
    a[i,l] := a[i,k];
    a[i,k] := j
  end;

Объяснение кода листинга программы

Создается цикл, в котором переменная i проходит значения от 1 до n.
Значение элемента массива a, расположенного на позиции [i, l], сохраняется в переменной j.
Значение элемента массива a, расположенного на позиции [i, l], заменяется значением элемента массива a на позиции [i, k].
Значение элемента массива a, расположенного на позиции [i, k], заменяется сохраненным значением j.