[СРОЧНЯК]{исправить}Вычислить сумму ряда для заданного числа членов N

[Z00mzoom]

Вычислить сумму ряда для заданного числа членов N
Снимо12к.PNG
вот задача.

var n,i:integer;
sum,r,x:real;
begin

write( 'x='); read(x);
Write ('n='); read(n);
If n>0 then
Begin
sum:=x;
r:=x;
for i:=2 to n do
begin
r:=-r*x*x;
sum:=sum+r/(2*i-1);
end;
writeln('sum=',sum,0,4);
end
else writeln('ошибочный ввод');
end.

Исправить."В моей программе считается арктангенс некоторого числа, значит значение суммы ряда, вычисленного для заданного x, должна быть равна значению arсtan в этой точке, а у меня не равно"

[Abstraction]

1) Условий не хватает. Этот ряд сходится не при любом x.
2) Какую точку проверяете?

[Z00mzoom]

какая те6е понравится. честн.Я больше чем в условие доно те6е не скажу.

[Abstraction]

В моей программе считается арктангенс некоторого числа, значит значение суммы ряда, вычисленного для заданного x, должна быть равна значению arсtan в этой точке, а у меня не равно

Для какого именно x Вы наблюдали неравенство?

[Mad_Cat]

Для какого именно x Вы наблюдали неравенство?

и при каком n?