Составить программу на Паскале сортировки массива по возрастанию

1 ответ

Посмотреть ответы

Megamozg

2180

Сортировка методом пузырька:

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.

Хороший ответ

5 апреля 2023 01:42

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Постройте граф, отражающий отношения между следующими объектами: «компьютер», «процессор», «память», «устройства ввода», «устройства вывода», «внутрен... Сколько битов содержит 1/8 кбайта?... Опишите четыре группы символов, образующих алфавит языка Паскаль. 1) 2) 3) 4)... Как расшифровывается ПО в информатике? Спасибо за ответ.... Требовалось написать программу вычисления факториала числа n (факториал числа n есть произведение всех целых чисел от 1 до n). Программист торопился и...