Сортировка массива

Метод пузырька

Алгоритм состоит в повторяющихся проходах по сортируемому массиву. За каждый проход элементы последовательно сравниваются попарно и, если порядок в паре неверный, выполняется обмен элементов. Проходы по массиву повторяются до тех пор, пока на очередном проходе не окажется, что обмены больше не нужны, что означает — массив отсортирован. При проходе алгоритма, элемент, стоящий не на своём месте, «всплывает» до нужной позиции как пузырёк в воде, отсюда и название алгоритма.

По возрастанию элементов:

Код:

program pyz;
const n = 20;
var V:array[1..n] of integer;
i,j,tmp:integer;
begin
Randomize;
 for i:=1 to n do 
  V[i]:= Random(100);
Writeln('Исходный массив: ');
 for i:=1 to n do Write(V[i],' ');

 for i:=1 to n-1 do 
  for j:=i+1 to n do
   if V[i] >= V[j] then begin
                     	tmp:= V[i]; 
	             	V[i]:= V[j]; 
		     	V[j]:= tmp;
           	     	end;
Writeln;
Writeln('Упорядоченный по неубыванию массив: ');
 for i:=1 to n do Write(V[i],' ');
Readln;
End.