Question

Паскаль выдаёт ошибку exitcode 205.Что не так?
program summa;
var
n:integer;x,a,S:real;
begin
x:=1;
a:=1;
S:=1;
n:=0;
while Abs(a)>1E-6 do
begin
a:=a*(-1)*x*x*(2*n+1)/2*n+3;
S:=4*S+a;
n:=n+1;
end;

Answer 1

У тебя отсутствует 'END.'

Answer 2

там всё есть.просто не до конца скопировалось) а за задание такое: подсчитать сумму 4 сумма от n:=0 до бесконечности: (-1)^n * x^(2n+1)/2n+1,прри x=1