Викиучебник

Реализации алгоритмов/Факториал: различия между версиями

Интерактивная навигация по истории
← Предыдущая правкаСледующая правка →
Содержимое удалено Содержимое добавлено
ВизуальныйВики-текст
Строка 7:
function fact(n : integer) : longint;
begin
if n <= 1 then fact := 1 else fact := n * fact(n - 1);
fact := 1
else
fact := n * fact(n - 1);
end;
</source>
Источник — https://ru.wikibooks.org/wiki/Реализации_алгоритмов/Факториал