/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/Other/SpeedTests/AbsVsMathAbs.pas
11 строк
256 B
Mikhalkovich Stanislav
изменена реализация Abs для целых на тривиальную. Ускорение - в 2.5 раза
03 май 2022, 16:09
03 май 2022, 16:09
1d09aa7
Код
Авторство
О чём код?
// Abs для целых работает в 2.5 раза быстрее Math.Abs begin var s := 0; var n := MaxInt; loop n do s := Abs(-2); Print(MillisecondsDelta); loop n do s := System.Math.Abs(-2); Print(MillisecondsDelta); end.