|
Вопрос # 4 124/ вопрос открыт / |
|
Доброго времени суток, уважаемые эксперты!
Мне дали задачку написать программу для сортировки целых неотриц элиментов алгоритмом Быстрой сортировки, я попробовал, но что то он работает оч. криво, выложите пожалуйста кто можжет рабочий код алгоритма быстрой сортировки. Заранее спасибо
 |
Вопрос задал: amigo (статус: 1-ый класс)
Вопрос отправлен: 6 мая 2010, 19:36
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: IlluminatI
Здравствуйте, amigo!
В приложении 100% рабочий код.
Приложение: Переключить в обычный режим- const
- maxn = 100000;
- Type
- DataType = extended;
- var
- i,n:longint;
- buf,X:DataType;
- a:array[1..maxn]of DataType;
-
- procedure Sort(L,R:Longint);
- var
- j:longint;
-
- begin
- i:=L; j:=R; X:=a[(i+j)shr 1];
- repeat
- while a[i]<X do inc(i);
- while a[j]>X do dec(j);
- if i<=j then begin
- buf:=a[i]; a[i]:=a[j]; a[j]:=buf;
- inc(i); dec(j);
- end;
- until i>j;
- if i<R then Sort(i,R);
- if j>L then Sort(L,j);
- end;
-
- begin
-
-
-
- end.
 |
Ответ отправил: IlluminatI (статус: 2-ой класс)
Время отправки: 6 мая 2010, 20:16
Оценка за ответ: 4
|
Мини-форум вопроса
Всего сообщений: 2; последнее сообщение — 6 мая 2010, 20:23; участников в обсуждении: 2.
|
Егор (статус: 10-ый класс), 6 мая 2010, 20:14 [#1]:
а гугел чем плох?
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
|
IlluminatI (статус: 2-ой класс), 6 мая 2010, 20:23 [#2]:
Почему 4? Обоснуй.
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
