Помощь - Поиск - Пользователи - Календарь
Полная версия: Время сортировки
Форум «Всё о Паскале» > Delphi, Assembler и другие языки. > Delphi
Sensitive
Здравствуйте!
У меня в программе производиться сортировка массива. Необходимо вычислить время сортировки.
Идея вот такая (сразу говорю поиском пользовалась, не нашла(( ):

 var
d1,d2,V:extended;

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


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


Добавлено через 4 мин.
Постой, а почему у тебя тип extended? Надо double blink.gif
volvo
Цитата
Идея вот такая
Вот тебе еще идея:
Как замерить время выполнения программы? Это будет ближе к истине, поскольку работает с более высокой точностью (RDTCS - до тактов).
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.