Дано целое число n. вычислить 1/1! +1/2! +1/3! ++1/n!
demyaniuk
3
02.03.2019 22:40
4
Другие вопросы по теме Информатика
VeraLife1
10.04.2020 17:31
steel09090
10.04.2020 17:31
dizendorfsergei007
10.04.2020 16:51
хорошист548
10.04.2020 16:51
АняЕнот
10.04.2020 16:50
Anfisac3t
10.04.2020 16:49
nikitakyznecov703
24.05.2019 05:20
Artemkizaru
24.05.2019 05:20
Популярные вопросы
- 1) Выписать составные словосочетания. Зайти в воду, несмотря на...
1 - Какое число должно быть на месте многоточий в равенстве? (10w+...)(10w−...)...
1 - Как встретила её страна берендеев?...
3 - Девочка массой 43 кг стоит на лыжах. Длина каждой лыжи равна 1,5...
3 - А)9х=-54 б)-0,7х=1,4 в)7,5х=-15...
2 - с историей... 1.Какое значение для развития русской живописи имел...
1 - До ть будь ласка Розкрийте дужки, вживаючи дієслова у Past Simple...
1 - Выбери те заряды, которыми может обладать тело. |e|=1,6⋅10−19 Кл...
3 - При разложении образца гидроксида алюминия, содержащего 20% примесей,...
2 - 3. На ферум(І) гідроксид кількістю речовини 0,5 моль подіяли розчином...
1
На Паскале:
program MyProgram;
var n,i,fact: integer; sum: real;
begin
sum:=0;
fact:=1;
writeln('Введите число N.');
readln(n);
for i:=1 to n do
begin
fact:=fact*i;
sum:=sum+1/fact;
end;
writeln('Сумма 1/1!+1/2!+1/3!+...+1/N = ',sum);
end.