> -- Илья Ермаков писал(а):
> Значит, слишком быстро, чтобы замерить.Поставьте на саму процедуру цикл, например, 1000 раз вызова.Тогда это станет измеримо.
Илья дело говорит. Так и статистика по 1000 измерениям получится.
## Код:
```
PROCEDURE Do*(N:INTEGER);
VAR  starttime, endtime:LONGINT; i: INTEGER;
BEGIN
  starttime := Kernel.Time();
  FOR i := 1 TO 1000 DO solve(N) END;
  endtime  := Kernel.Time();
  Log.Real((endtime-starttime)/1000); Log.Ln;
END Do;
```


Не связывайтесь с MSDN сейчас.