Тема: Benchmark
Показать сообщение отдельно
  #1  
Старый 05.01.2012, 17:12
Аватар для Dem0Men
Dem0Men Dem0Men вне форума
Прохожий
 
Регистрация: 06.02.2011
Адрес: г. Ярославль
Сообщения: 26
Версия Delphi: 2007, XE
Репутация: 10
По умолчанию Benchmark

Здраствуйте, я недавно начал изучать C++ и столкнулся с проблемой выбора IDE и компилятора. Остановился на 2-х IDE: VS2010 и Code::Blocks, решил посмотреть, какой из компиляторов: VS2010 или MinGW шустрее и скомпилировал 3 программки(+ Delphi 7). Вот код Delphi:
Код:
program D7Benchmark;

{$APPTYPE CONSOLE}

uses
  SysUtils, DateUtils;

const
  REPEAT_NUM = 100000;

function Fact(N: integer):integer;
begin
    if (N = 1) or (N = 0) then
        Result := 1
    else
        Result := N * Fact(N - 1);
end;

var
  i : integer;
  T1 : TDateTime;
begin
  T1 := Now;
  for i := 1 to REPEAT_NUM do
    Write(Fact(15));
  WriteLn('Num of calculatings:');
  WriteLn(REPEAT_NUM);
  WriteLn('Time of working is:');
  WriteLn(MilliSecondsBetween(Now, T1));
  WriteLn('PressEnter');
  ReadLn;
end.

Скорость поражает! VS сделал 10.000 итераций за 3с, Delphi 100.000 за 0.8с, MinGW 100.000 за 1с. Т.е Delphi на несколько порядков быстрее VS! Прокомментируйте
Вложения
Тип файла: 7z Benchmark.7z (131.8 Кбайт, 11 просмотров)
__________________
Итерация от человека. Рекурсия — от Бога.
Ответить с цитированием