Поменять местами две строки квадратной матрицы - 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);
ОТСЮДА Я НЕ ПОНИМАЮ ЧТО ДЕЛАТЬ ) Как правильно написать цикл изменения елементов двух строк??

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

textual
Листинг программы
  for j:=1 to n do begin
    t:=a[k,j]; a[k,j]:=a[l,j]; a[l,j]:=t;
  end;

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

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

Оцени полезность:

8   голосов , оценка 3.875 из 5
Похожие ответы