Дано условие: arcsinx=x "алгебраическая сумма от 1 до бесконечности"(13...(2n-1)x^(2n 1))/(24...2n(2n 1))
Program cvthnmcert;
label 1;
var
x,s:real;
n,i:integer;
Begin
cls;
Writeln('Введите n');
readln(n);
1: writeln('Введите х');
readln(x);
if abs(x)>=1 then goto 1;
s:=x;
for i:=1 to n do
s:=s ((2i-1)power(x,(2i 1))/(2i(2i 1)));
writeln('Ответ ',s);
end.
Вот что получилось, но с ответом не сходится даже приближенно. Никак не пойму в чем проблема
Комментарий для минусов внутри