Задача: Факториал числа представляет собой произведение всех натуральных чисел от 1 до этого числа включительно. Например, факториал числа 7 выглядит так:1 * 2 * 3 * 4 * 5 * 6 * 7Факториал числа обозначается как само число посл...

Задача: Факториал числа представляет собой произведение всех натуральных чисел от 1 до этого числа включительно. Например, факториал числа 7 выглядит так: 1 * 2 * 3 * 4 * 5 * 6 * 7 Факториал числа обозначается как само число после которого следует восклицательный знак. Например, 7!. Таким образом: 7! = 1 * 2 * 3 * 4 * 5 * 6 * 7 = 5040 Требуется определить факториал числа, которое ввел пользователь.
Гость
Ответ(ы) на вопрос:
Гость
1)readln(n); if (n=0) then writeln('0!=1') else if (n<0) then writeln('Определяется только для положительных чисел') else begin s:=1; for i:=1 to n do s:=s*i; writeln(n,'!='s:0:0); end; 2)function f(x:byte):real; begin if x=0 then f:=1 else f:=f(x-1)*x; end;2 с помощью рекурсии, как видно
Гость
uses crt;var f:real;     x,n:integer; begin      f:=1;      write('N='); readln(N);      if N<0 then writeln('EROOR!') else      if N=0 then writeln('N!=',1)      else begin          for x:=2 to N do               f:=f*x;          writeln('N!=',f); end; end. ---- Влазят только числа, не превышающие 170.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы