Поменять местами две строки квадратной матрицы - Pascal

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

Здраствуйте. Мне нужна помощь при написании программы для изменения местами двух строк в матрице. Вот коментарий: Получаем матрицу А рандомно, выводим ее и потом, вводим значения номеров двух строк l,k(которые необходимо поменят местами) и вывести вторую матрицу B (в которой k,l поменялись местами) / Вот мой код

                    Листинг программы
                
 
                        
                          
                    
program Matrix;
uses crt;
var
i,k,l,n,j,f,x : longint;
a: array [1 .. 100, 1 .. 100] of longint;
begin 
clrscr;
randomize;
Write ('Vvedit rozmir matritsi '); Readln (n);
for i:=1 to n do
for j:=1 to n do
a[i,j]:= random (n+1);
Writeln ('Vasha matritsa'); {Vivodimo pochatkovu matritsu}
for i:=1 to n do
begin
for j:=1 to n do
Write ( a[i,j], ' ');
writeln;
end;
Write ('Vvedit k='); Readln (k);
Write ('Vvedit l='); Readln (l);

ОТСЮДА Я НЕ ПОНИМАЮ ЧТО ДЕЛАТЬ ) Как правильно написать цикл изменения елементов двух строк??

Решение задачи: «Поменять местами две строки квадратной матрицы»

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

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

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

Создается переменная j - она используется в качестве счетчика в цикле.
Выбирается значение переменной n - предположительно это размерность матрицы.
Создается переменная t для временного хранения значения элемента матрицы.
Выполняется цикл от 1 до n (включительно).
Временно сохраняется значение элемента матрицы a[k,j] в переменной t.
Значению элемента a[k,j] присваивается значение элемента a[l,j].
Значению элемента a[l,j] присваивается значение переменной t, хранящееся в t.
Цикл завершается.