Вопрос по информатике:
Написать программу в паскале
Написать программу для решения следующей задачи: упорядочить по возрастанию элементы каждой строки матрицы А(10,8) и вывести ее в виде таблицы.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 24.11.2016 15:16
- Информатика
- remove_red_eye 4981
- thumb_up 13
Ответы и объяснения 1
var a:array [1..10,1..8] of longint;
i,j,k,x:longint;
begin for i:=1 to 10 do
for j:=1 to 8 do a[i,j]:=random(20)-10;
writeln ( 'Массив до изминений:' );
for i:=1 to 10 do
begin
for j:=1 to 8 do write ( a[i,j],' ' );
writeln;
end;
for i:=1 to 10 do
begin
for j:=1 to 8-1 do
for k:=j+1 to 8 do
if a[i,j]>a[i,k] then
begin
x:=a[i,j];
a[i,j]:=a[i,k];
a[i,k]:=x;
end;
end;
writeln ( 'Массив после изминений:' );
for i:=1 to 10 do
begin
for j:=1 to 8 do write ( a[i,j],' ' );
writeln;
end;
end.
- 25.11.2016 13:25
- thumb_up 37
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.