Описать функцию Fact (n) вещественного типа вычисляющую значение факториала n!=1*2*3*..*n (n больше 0, параметр целого типа). С помощью этой функции найти факториалы пяти данных целых чисел.
Описать
функцию Fact (n) вещественного типа вычисляющую значение факториала n!=1*2*3*..*n (n>0, параметр целого типа). С помощью этой функции найти
факториалы пяти данных целых чисел.
Гость
Ответ(ы) на вопрос:
ГостьВот программа:
var
x:integer;
function Fact(n:integer): integer;
var
i,sum:integer;
begin
sum:=1;
for i:=1 to n do
sum:=sum*i;
result:=sum;
end;
begin
readln(x);
writeln(Fact(x));
end.
--------->С помощью этой функции найти факториалы пяти данных целых чисел.
- Вы не написали каких чисел
Не нашли ответ?
Похожие вопросы