Напишите функцию, которая вычисляет факториал натурального числа N (PascalABC)
Напишите функцию, которая вычисляет факториал натурального числа N (PascalABC)
Гость
Ответ(ы) на вопрос:
Гостьfunction factorial(n:integer):integer;(или longint, если n большое)
i,ch:integer;
begin
ch:=1;
for i:=1 to n do
ch:=ch*i;
factorial:=ch;
end;
Не нашли ответ?
Похожие вопросы