Тесты производительности

Просмотров: 5645

Поучаствуй в замерах производительности программ для PascalABC.NET, Free Pascal и Visual C++.

Скачай программы и заполни эту таблицу.

Новости

29.08.16. Вышла версия 3.2. Реализован оператор yield.

12.02.16. Вышла версия 3.1. Добавлены кортежи в стиле (a,b) и кортежное присваивание (a,b) := (b,a)

31.12.15. Версия 3.0.0.1128. Реализованы обобщенные методы расширения для операций

22.12.15. Версия 3.0.0.1116. Реализован новый синтаксис extension-методов

Случайная программа

// Функция определения простоты числа
// Уровень сложности: 1

function IsPrime(N: integer): boolean;
begin
  Result := True;
  if N<2 then
    Result := False
  else
    for var i:=2 to round(sqrt(N)) do
      if N mod i = 0 then
      begin
        Result := False;
        exit;
      end;
end;

begin
  for var i:=2 to 20 do
    Println(i,IsPrime(i));
end.