/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/SPython/time_measurement_example.pas
18 строк
273 B
Mikhalkovich Stanislav
SPython в 3.11
31 авг 2025, 17:21
31 авг 2025, 17:21
6d15540
Код
Авторство
О чём код?
begin var n := 60000; var t1 := Milliseconds; var sm := 0.0; var i := 1.0; while i < n do begin var j := 1.0; while j < n do begin sm += 1.0 / i / j; j += 1; end; i += 1; end; var t2 := Milliseconds; print(t2 - t1); end.