Вопрос по информатике:
По заданному натуральному значению n и вещественному числу х вычислите 1+х/2+х/6+х/24+....+х/n!
Пожаловаться
- 03.09.2018 12:20
- Информатика
- remove_red_eye 17594
- thumb_up 46
Ответы и объяснения 2
Var
N,i:integer;
X,S,F:real;
Begin
Write('N = ');ReadLn(N);
Write('X = ');ReadLn(X);
S:=1;
For N:= 1 to N do
Begin
F:=1;
For i:= 2 to N+1 do
F:=F*i;
S:=S+X/F;
End;
Write(S);
End.
N,i:integer;
X,S,F:real;
Begin
Write('N = ');ReadLn(N);
Write('X = ');ReadLn(X);
S:=1;
For N:= 1 to N do
Begin
F:=1;
For i:= 2 to N+1 do
F:=F*i;
S:=S+X/F;
End;
Write(S);
End.
Пожаловаться
- 04.09.2018 03:03
- thumb_up 17
// PascalABC.NET 3.2, сборка 1387 от 20.02.2017
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
var x:=ReadReal('x=');
(var s,var a):=(0.0,1.0);
for var i:=2 to n do begin a:=a/i; s+=a; end;
Writeln('S=',1+x*s)
end.
Пример
n= 10
x= 2.7
S=2.93936086309524
Пожаловаться
- 05.09.2018 10:12
- thumb_up 17
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы