даны действительное число Х не равное нулю и число n целое. составить программу и вычислить сумму ряда S
Приложения:

BobbyFresnel:
Неполное условие
Ответы
Ответ дал:
1
var
i, n: integer;
x, s, a, xn: real;
begin
read(n, x);
a := 1;
s := 1;
xn := 1;
for i := 1 to n do
begin
a := a * (2 * i - 1) / sqr (2 * i);
xn := xn * x;
s := s - a * xn;
end;
write(s * Pi / 2);
end.
Вас заинтересует
1 год назад
2 года назад
2 года назад