Gaanekbup
7 год назад
ПАСКАЛЬ.правильно ли я составила?
1 фото- задание
ОТВЕТЫ
Леонтьевич
Jul 17, 2019
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
70
Смежные вопросы:
