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

Question

Yurecm · Accepted Answer

Сортировка методом пузырька: 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.

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

Задание:

Решение: