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

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

котеенок1233 котеенок1233    1   16.06.2019 22:40    5

Ответы
An0441 An0441  13.07.2020 18:24
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
AHOHUM3321 AHOHUM3321  14.04.2020 17:22
Как записываются функции на языке Паскаль?...
ирина1857 ирина1857  21.04.2019 19:50
Перевести числа в 10ричную систему счисления. 101011(2). 1101102(2). 75(8).134(8). 765(8). 12031(4). 2643(8). 1вс(16). 22в(16). а35(16). 2fe1(16). в скобках система...
Metalmekid Metalmekid  21.04.2019 19:56
Программирование линейных алгоритмов»составь программу, позволяющую посчитать сумму цифрвводимого с клавиатуры двухзначного числа. длясоставления программы воспользуйся...
simpleam simpleam  16.05.2020 20:46
С ИНФОРМАТИКОЙ РЕШИТЕ ХОТЯ БЫ ОДНУ 1)Даны два массива А и В из 20 однозначных чисел. В первом из них записано количество мячей, забитых футбольной командой в игре,...
Anechka6665 Anechka6665  16.05.2020 20:46
Пользователь работал с каталогомD:\ ФУТБОЛ\ЧМ\2018\РОССИЯ. Сначала он поднялся на три уровня вверх, затем спустился в каталог ФОТО, после этого спустился в каталог...
ник4898 ник4898  30.08.2019 06:00
Определите является ли заданое число положительным четным числом .соответвующие сообщения выведите на экран...
valnov24200105oxnmv8 valnov24200105oxnmv8  29.08.2019 12:10
Дано действительное положительное число a и целоe число n. вычислите an. решение оформите в виде функции power(a, n). стандартной функцией возведения в степень...
2da0s0ha21 2da0s0ha21  29.08.2019 12:10
Даны пять действительных чисел: x, y, xc, yc, r. проверьте, принадлежит ли точка (xy) кругу с центром (xcyc) и радиусом r. если точка принадлежит кругу, выведите...
dofkatop00nj7 dofkatop00nj7  24.11.2019 13:58
1. чем бы вы могли бы обьяснить возвышение пруссии? 2. какой сил складывается в европе к середине 18 века?...
Даниил555777 Даниил555777  24.11.2019 13:58
Составить предложение не подниму по часам...

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