/
spirzen
/
it-code-examples
Обзор
Документация
Войти
/
spirzen
/
it-code-examples
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
examples/pascal/lab-1140-012/main.pas
17 строк
194 B
Spirzen
Code migration pack
09 июн 2026, 01:41
09 июн 2026, 01:41
cebc284
Код
Авторство
О чём код?
program FactRec; function Fact(n: integer): int64; begin if n <= 1 then Fact := 1 else Fact := n * Fact(n - 1); end; var n: integer; begin ReadLn(n); WriteLn(Fact(n)); end.