Информатика: Вдвумерном массиве поменять местами 2 строки.

Милана070800

15.11.2021 14:19

Информатика

Есть ответ 👍

Вдвумерном массиве поменять местами 2 строки.

165

281

Посмотреть ответы 2

Ответы на вопрос:

kirinjindosh12

Информатика

4,4(75 оценок)

Const n = 2; m = 5; var a: array [1..n, 1..m] of integer; i, j, x: integer; begin writeln('исходная матрица: '); for i : = 1 to n do begin for j : = 1 to m do begin a[i, j] : = random(15) + 1; write(a[i, j]: 4); end; writeln; end; for j : = 1 to m do begin x : = a[1, j]; a[1, j] : = a[2, j]; a[2, j] : = x; end; writeln; writeln('итоговая матрица: '); for i : = 1 to n do begin for j : = 1 to m do write(a[i, j]: 4); writeln; end; end.