Быстродействие языков тест2

Delphi 7 - 1 секунда с оптимизацией, 3 без оной. Delphi 8 NET показал 3 секунды с оптимизацией.. Хотя там эта галочка ничего не меняет, видимо, резерв.
71 килобайт в NET варианте, из-за модуля sysutils, который пришлось использовать для подсчета времени. Некоторые оконные проги меньше выходят. Например, пустая прога с окном выходит 18 килобайт..
Надеюсь, я правильно перевел с незнакомого мне языка, сам уже не помню, к стыду своему.

program fibb;

{$APPTYPE CONSOLE}

uses
SysUtils;
function fib(n:cardinal):cardinal;
begin
if n<2 then result:=1 else result:=fib(n-1)+fib(n-2)
end;
var time:TDatetime;
begin
time:=now;
writeln('Result=',fib(40));
writeln('time=',timetostr(now-time));
readln;
end.
Поправьте, если что не так.

Jameson, 06.03.2004 14:45:52 :

Delphi 7 - 1 секунда с оптимизацией, 3 без оной. Delphi 8 NET показал 3 секунды с оптимизацией..

 

В общем, .NET - это быстро

>Надеюсь, я правильно перевел с незнакомого мне языка, сам уже не помню, к стыду своему.

Правильно.

Да, забыл - проц AXP2100+ thoroubred на epox k3ap ram ddr333 под WINXP.

Упустил я как-то - за счёт чего в виндах системный таймер разогнан до частоты выше стандартных 14.31818/12/65536 МГц = 18.2Гц? (как раз 0.055 сек на такт). Т.е. нынче в железе стоит отдельный таймер, или стандартный разогнан, а для старых приложений эмулируется?

 

Хочу заметить, что системный таймер можно программировать. И частота его может значительно превосходить 18,2 Гц. !!!

Oleg_Z, 20.06.2004 21:04:23 :

Хочу заметить, что системный таймер можно программировать. И частота его может значительно превосходить 18,2 Гц. !!!

 

А хотя бы предыдущую страницу этого топика прочесть лень, да?

Быстродействие языков тест2 [Balancer#19.01.04 17:01]
Быстродействие языков тест2 [Balancer#28.01.04 12:04]