Обменяйте местами элементы строк матрицы - Turbo Pascal
Формулировка задачи:
2. Заполните случайным образом двумерный массив размерности n × n. Обменяйте местами элементы следующих строк:
1)1-я строка - n-ная строка
2)2-я строка – (n-1) -ая строка
3)3-я строка- (n-2)- ая строка
Решение задачи: «Обменяйте местами элементы строк матрицы»
textual
Листинг программы
uses crt; const nmax=10; var a:array[1..nmax,1..nmax] of integer; n,i,j,x:integer; begin clrscr; randomize; repeat write('Размер матрицы до ',nmax,' n='); readln(n); until n in [1..nmax]; writeln('Исходная матрица:'); for i:=1 to n do begin for j:=1 to n do begin a[i,j]:=random(50); write(a[i,j]:3); end; writeln; end; for i:=1 to n div 2 do for j:=1 to n do begin x:=a[i,j]; a[i,j]:=a[n-i+1,j]; a[n-i+1,j]:=x end; writeln('Перестановка строк'); for i:=1 to n do begin for j:=1 to n do write(a[i,j]:3); writeln; end; readln end.
Объяснение кода листинга программы
- Создаётся переменная
nmax
со значением 10. - Создаётся переменная
a
типаarray[1..nmax,1..nmax] of integer;
. - Создаются переменные
n
,i
,j
,x
типаinteger;
. - Выполняется инициализация переменной
a
с помощью циклаrepeat...until
. - Выводится сообщение
Размер матрицы до nmax n=
. - Пользователю предлагается ввести размер матрицы
n
. - В цикле
for i:=1 to n do
происходит заполнение матрицы случайными значениями от 0 до 99. - Выводится сообщение
Исходная матрица:
. - Выполняется перестановка строк матрицы с помощью вложенного цикла
for i:=1 to n div 2 do...for j:=1 to n do
. - Выводится сообщение
Перестановка строк
. - В цикле
for i:=1 to n do
происходит вывод значений элементов матрицы. - Выводится сообщение
Перестановка строк
. - Выполняется чтение значения
n
от пользователя. - Выводится сообщение
Исходная матрица:
. - Выполняется перестановка строк матрицы с помощью вложенного цикла
for i:=1 to n div 2 do...for j:=1 to n do
. - Выводится сообщение
Перестановка строк
. - В цикле
for i:=1 to n do
происходит вывод значений элементов матрицы. - Выводится сообщение
Перестановка строк
. - Выполняется чтение значения
n
от пользователя. - Выводится сообщение
Исходная матрица:
.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д