Помогите пожалуйста решить. В голову нечто не лезет!
Заранее спасибо!
Нажмите для просмотра прикрепленного файла
..............
c:=x;
y:=Pi/2 - x;
n:=1;
while abs( c)>eps do
begin
c:=c*sqr(x)*sqr(2*n-1)/(2*n)/(2*n+1);
y:=y-c;
inc(n);
if n<=MaxIter then
.........................