/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/CompilationSamples/time1.pas
15 строк
228 B
AlexanderZemlyak
Multilingual support (#3278)
17 июн 2025, 18:34
Не верифицирован
17 июн 2025, 18:34
7b81e31
Код
Авторство
О чём код?
unit time1; interface function time(): real; function forty_two(): real; implementation function time() : real := DateTime.UtcNow.Subtract(new DateTime(1970, 1, 1)).TotalSeconds; function forty_two() : real := 42; end.