Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
3 апреля 2023 01:42
710
Составить программу на Паскале сортировки массива по возрастанию
1
ответ
Сортировка методом пузырька:
const n=10;
Var a:array[1..n] of integer; i,j,b:integer;
Begin
for i:=1 to n do read(a[i]);
for i:=1 to n-1 do
for j:=i+1 to n do
if a[j]<a[i] then
begin
b:=a[i];
a[i]:=a[j];
a[j]:=b;
end;
for i:=1 to n do write(a[i],' ');
End.
const n=10;
Var a:array[1..n] of integer; i,j,b:integer;
Begin
for i:=1 to n do read(a[i]);
for i:=1 to n-1 do
for j:=i+1 to n do
if a[j]<a[i] then
begin
b:=a[i];
a[i]:=a[j];
a[j]:=b;
end;
for i:=1 to n do write(a[i],' ');
End.
0
·
Хороший ответ
5 апреля 2023 01:42
Остались вопросы?
Еще вопросы по категории Информатика
Какие из перечисленных устройств обязательно входят в состав мультимедийного компьютера А-модем Б-сканер В-CD/DVD Г-сетевая карта Д-звуковая карт...
Автоматическое устройство осуществило перекодировку информационного сообщения на русском языке длиной в 20 символов, первоначально записанного в 16-би...
Переведите целые числа из десятичной системы счисления в шестнадцатеричную 256, 400, 1234, 2012. помогите пожалуйста решить очень нужно...
Плиз помогите!!! Продумайте и изобразите в виде схемы (графа) структуру одного из следующих сайтов: ⦁ «Моя семья» ⦁ «Мой класс» Нарисуйте цветной...
СРОЧНО! Как называется информационный процесс, который использует ученик при запоминаниии формул? А) хранение информации Б) передача информации В...