Предыдущая страница реферата | 1  2  3  4  5  6  7  8  9  10  11 | Следующая страница реферата

for i:=1 to n-1 do

for j:=1 to n-1 do

if a[j]>a[j+1] then

begin

x:=a[j];

a[j+1]:=a[j];

a[j]:=x;

end;

{Двоичный поиск}

l:=1; r:=n+1; a[n+1]:=x;

while (l<r) do

begin

m:=(r+l) div 2;

if aa[m]>x then

l:=m+1;

else

r:=m;

end;

{Сортировка бинарными вставками}

for i:=2 to n do

begin

r:=i;

l:=i;

while (l<r);

Begin

Рекомендуем скачать другие рефераты по теме: реферат по литературе, реферат слово.





Предыдущая страница реферата | 1  2  3  4  5  6  7  8  9  10  11 | Следующая страница реферата