Какова скорость выполнения цикла ?

[irradiator]

Товарищи !
Подскажите, пожалуйста, какова скорость выполнения цикла for в ПК.
Предполагаю скорость может зависеть очевидно от того, что внутри цикла.
Но, в принципе, если цикл был бы пустой, то "перещёлкивание" счётчика цикла, наверно как-то зависит от тактовой частоты процессора и.т.п ?!)

[type_Oleg]

procedure TForm1.Button1Click(Sender: TObject);
var i:Integer;
 t:TDateTime;
begin
 t:=Now;
 for i:=1 to 100000000 do;
 Edit1.Text:=FloatToStr(86400*(Now-t)); // в секундах
end;

У меня получается по разному : 0.421000155620277, 0.405000569298863, 0.499000260606408 и т.д. То есть, порядка 4..5 нс на цикл. Процессор 2 ГГц
А если одновременно смотреть ролик Ютубе, то 0.905000371858478 , 0.632999860681593, 0.623000040650368 и т.д.

PS Если не пустой, например:

for i:=1 to 1000000 do x:=Sin(i);

примерно 240..250 нс на цикл.

[eval]

если цикл был бы пустой, то "перещёлкивание" счётчика цикла

эх, надо смотреть во что оно выливается, скорее всего это атомарная операция - длиться один такт процессора както так: dword ptr [ebp-44h],edx
но умный компилятор такой цикл просто выбросит, и он ничего не "стоит"

[irradiator]

type_Oleg, eval, большое спасибо за информативный ответ.