Напишите функцию, которая вычисляет факториал натурального числа N (PascalABC)

23 Апр 2020 в 19:40
123 +1
0
Ответы
1
function Factorial(N: Integer): Integer;
var
i, fact: Integer;
begin
fact := 1;
for i := 1 to N do
begin
fact := fact * i;
end;
Result := fact;
end;
18 Апр 2024 в 13:25
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир