Ответы
Ответ дал:
0
var
x,y:real;
i,n:integer;
begin
n:=1;
x:=1;
y:=1;
for i:=1 to 5 do
begin
n:=n*i;
x:=-1.5*x;
y:=y*(x+1/n);
end;
writeln(y:15:5);
end.
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад