Ответы
Ответ дал:
0
var x,a,s:real; i:integer;
begin
x:=0.5;
s:=0;
for i:=1 to 10 do
begin
a:=cos(2*i)/((2*i-1)*(2*i+1));
s:=s+a;
end;
writeln('s = ',s);
end.
Результат:
s = -0.15972955915057
begin
x:=0.5;
s:=0;
for i:=1 to 10 do
begin
a:=cos(2*i)/((2*i-1)*(2*i+1));
s:=s+a;
end;
writeln('s = ',s);
end.
Результат:
s = -0.15972955915057
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад