Решить задачку в паскаль abs "дан двумерный массив,состоящий из 2 строк
Решить задачу в паскаль абс "дан двумерный массив,состоящий из 2 строк и 3 столбцов..необходимо пересортировать массив таким образом,чтоб нижняя строчка(2) заняла место верхней(1),а верхняя(1) заняла место нижней(2).как можно проще пожалуйста
Задать свой вопрос1 ответ
Вероника
Program a1;
var a:array [1..2,1..3] of integer;
k: integer;
i,j: integer;
begin
Вводим в массив числа
for j:=1 to 3 do
for i:=1 to 2 do
read(a[i,j]);
Чтоб не писать 2 раза то, что ниже в цикле
for i:=1 to 2 do
begin
k:=a[i,1];
a[i,1]:=a[i,3];
a[i,3]:=k;
end;
Пустопорожняя строчка, чтобы поделить ввод и вывод
writeln;
Вывод информации на экран
for j:=1 to 3 do
begin
for i:=1 to 2 do
write(a[i,j],' ');
writeln;
end;
end.
var a:array [1..2,1..3] of integer;
k: integer;
i,j: integer;
begin
Вводим в массив числа
for j:=1 to 3 do
for i:=1 to 2 do
read(a[i,j]);
Чтоб не писать 2 раза то, что ниже в цикле
for i:=1 to 2 do
begin
k:=a[i,1];
a[i,1]:=a[i,3];
a[i,3]:=k;
end;
Пустопорожняя строчка, чтобы поделить ввод и вывод
writeln;
Вывод информации на экран
for j:=1 to 3 do
begin
for i:=1 to 2 do
write(a[i,j],' ');
writeln;
end;
end.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
задание экономиоти
Рассмотри ситуацию: человек живёт на Крайнем Се-вере. С помощью каких
Экономика.
Человек живет на Крайнем Севере. С помощью каких благ удовлетворяются потребности
Экономика.
там лежат три яйца.у дома рос клен.Это гнездо сойки.на клёне гнездо
Русский язык.
Тыныштық күйіндегі карусель 35 с-та 3,0 рад/с бұрыштық жылдамдықпен үдей қозғалады.
Разные вопросы.
Сочинение на тему "Русский язык не сможет умереть!"
Математика.
Приветствую!
Меня зовут Станислав, я представляю компанию under.site.
Хотел бы предложить интересное решение
Разные вопросы.
Масса трёх одинаковых пакетов чая 180г чему равна масса
Математика.
Газообразный аммиак объёмом 2.24 л (н.у.) был полностью поглощён 14.68 мл
Химия.
Упражнение 2 Выпишите глаголы и вставьте пропущенные буквы
Русский язык.
Радиус окружности, описанной около равностороннего треугольника, равен 6. Найдите сторону треугольника
Геометрия.
Облако тегов