Реализуйте рекурсивную функцию вычисления факториала натурального числа. напоминаем, что факториалом числа называется произведение всех натуральных чисел, меньших или равных ему. к примеру, факториал 55 равен 5⋅4⋅3⋅2⋅15⋅4⋅3⋅2⋅1. формат входных данных на вход ваша программа получает одно число — n (1≤n≤8)(1≤n≤8). формат выходных данных выведите одно число — факториал числа n.

solomeina2017 solomeina2017    2   14.08.2019 19:40    0

Ответы
Kiiss Kiiss  04.10.2020 19:26
Var n:integer;
function fact(n:integer):longint;
begin
if n=1 
 then fact:=1
 else fact:=n*fact(n-1);
end;
begin
write('n = ');
readln(n);
writeln(n,'! = ',fact(n));
end.

Пример:
n = 6
6! = 720
ПОКАЗАТЬ ОТВЕТЫ
mamanazaruz60 mamanazaruz60  04.10.2020 19:26
Var n: int64;
 function f(n: int64): int64;
begin
  if(n = 1) then f := 1
  else f := f(n - 1) * n;
end;
 begin
  readln(n);
  write(f(n));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика