Информатика, опубликовано 2018-08-22 18:12:04 by Гость
Дано целое чисто N(>0).Найдите произведение N!=1*2...*N (N-факториал).чтобы избежать целочисленного переполнения,вычислять это произведение с помощью вещественной переменной и вывести его как вещественное число.
Ответ оставил Гость
Program enot;
VAR p:real;
i,n:integer;
BEGIN
p:=1;
read(n);
for i:= n downto 1 do
p:= p*i;
writeln(p:4:2);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.