
Задан массив А[1..5,1..6]. Поменять в нем местами первый и последний столбец.


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

Program vvv2;
uses crt;
const n=5;
const m=6;
var
a:array[1..n,1..m] of integer;
st:array[1..n] of integer;//массив для хранения столбца
i,j,nomer,min : integer;
begin
Randomize;
for i:=1 to n do
for j:=1 to m do
a[i,j]:= Random(100); //заполняем массив
writeln;
writeln('Начальный массив:');
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j]:5);//выводим массив
writeln;
end;
writeln('*** alphaues is thinking... ***');
for i:=1 to n do
begin
st[i]:=a[i,1];
a[i,1]:=a[i,m];
a[i,m]:= st[i];
end;
writeln;
writeln('Результат:');
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j]:5);//выводим массив
writeln;
end;
end.



var
a:array [1..5,1..6] of integer;
i,j,buf:integer;
begin
randomize;
for i:=1 to 5 do begin
for j:=1 to 6 do begin
a[i,j]:=random(8)+2;
write (a[i,j],' ');
end;
writeln;
end;
for i:=1 to 5 do begin
buf:=a[i,1];
a[i,1]:=a[i,6];
a[i,6]:=buf;
end;
writeln;
for i:=1 to 5 do begin
for j:=1 to 6 do write (a[i,j],' ');
writeln;
end;
readln;
end.



Для того чтобы поменять местами первый и последний столбцы в массиве А[1..5,1..6], нужно выполнить следующие шаги:
1. Создать временную переменную, в которую будет сохранен первый столбец массива. 2. Заменить значения первого столбца массива значениями последнего столбца. 3. Заменить значения последнего столбца массива значениями из временной переменной.
Вот пример кода на языке Python, который реализует эту задачу:
```python # Заданный массив A = [ [1, 2, 3, 4, 5, 6], [7, 8, 9, 10, 11, 12], [13, 14, 15, 16, 17, 18], [19, 20, 21, 22, 23, 24], [25, 26, 27, 28, 29, 30] ]
# Поменять местами первый и последний столбцы for row in A: row[0], row[-1] = row[-1], row[0]
# Вывести измененный массив for row in A: print(row) ```
Результат выполнения кода будет следующим:
``` [6, 2, 3, 4, 5, 1] [12, 8, 9, 10, 11, 7] [18, 14, 15, 16, 17, 13] [24, 20, 21, 22, 23, 19] [30, 26, 27, 28, 29, 25] ```
Таким образом, первый и последний столбцы массива были успешно поменяны местами.


Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili