1. Информатика
  2. Дано целое число n(больше 0)

Дано целое число n(больше 0) найти произведение n! =1*. n(факториал).чтобы избежать целочисленного переполнения,вычислять это произведение с вещественной переменной и вынести его как вещественное число

arty181118 arty181118    1   12.09.2019 11:10    0

Ответы
дизззи дизззи  07.10.2020 09:31
Var
 f:real;
 i,n:longint;

begin
write('Write n: ');readln(n);
f:=1;
for i:=1 to n do
 begin
 f:=f*i;
 end;
writeln('fact: ',f:0:0);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
morfinn morfinn  17.09.2019 19:21
Дано вещественное число а. не пользуясь никакими арифметическими операциями, кроме умножения, получить а6 за три операции в паскале...
reki45 reki45  10.09.2019 15:00
Дан произвольный треугольник abc, для которого определен следующий набор характерных параметров: a,b,c - стороны треугольника, альфа, бета, гамма - углы (в градусах), h - высота,...
mtv1007 mtv1007  10.09.2019 15:00
Y=28 mod 4 y2= 28\4 xtve hfdys brcs...
LaimZ LaimZ  26.03.2020 10:28
Що з переліченого не є алгоритмом? таблиця множення формула s=v*t рецепт приготування вареників інструкція з використання гаджету...
эрика86 эрика86  26.03.2020 10:31
Данный ip 192.127.17.34/4 делят на подсети с максимальной экономией адресного на подсети по 1024 компьютера. Сколько всего будет таких подсетей ? Данный ip 192.127.17.34/13...
bogdantanya20171 bogdantanya20171  26.03.2020 10:32
1)Дан массив действительных чисел размерность которого n подсчитать сколько в нем положительных элементов C++ 2) дан одномерный массив найти произведение нечетных элементов...
кококо23 кококо23  30.09.2019 20:16
укажите целое число от 12 до 16, двоичная запись которого содержит ровно три единицы. если таких чисел несколько, укажите наибольшее из них. 30 ....
Асия22222 Асия22222  30.09.2019 20:16
Найдите наибольшее целое решение неравенства 4x+3 бит 8x-4 кбнайдите наибольшее целое решение неравенства 4x+3 бит 8x-4 кб...
zabirovrobert zabirovrobert  12.01.2021 16:36
Написати конспект про Миколу Гоголя...
Ксюшка221 Ксюшка221  12.01.2021 16:36
6 Прочитайте текст. Определите его тему. Проанализируйте его, используяследующие пометки: «+» – укажите место, которое содержит новую длявас информацию; «-» - укажите место,...

Популярные вопросы