Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Делфи _ Время сортировки

Автор: Sensitive 15.05.2009 0:43

Здравствуйте!
У меня в программе производиться сортировка массива. Необходимо вычислить время сортировки.
Идея вот такая (сразу говорю поиском пользовалась, не нашла(( ):

 var
  d1,d2,V:extended;

  d1:=Now;
  PiramSort(a,b); {вызов процедуры сортировки}
  d2:=Now;
  V:=d2-d1;
  Label4.Caption:='Время сортировки = '+FloatToStr(V);


Выводит просто 0, вместо времени, за которое выполнилась процедура сортировки sad.gif
Что не так?

Автор: Lapp 15.05.2009 1:01

Цитата(Sensitive @ 14.05.2009 21:43) *
Что не так?
Слишком быстро сортируешь, полагаю)). Поставь Sleep(1000) за сортировкой и посмотри, какая будет разница.


Добавлено через 4 мин.
Постой, а почему у тебя тип extended? Надо double blink.gif

Автор: volvo 15.05.2009 3:12

Цитата
Идея вот такая
Вот тебе еще идея:
http://volvo71.narod.ru/time_count.htm Это будет ближе к истине, поскольку работает с более высокой точностью (RDTCS - до тактов).