Размещено 5 лет назад по предмету
Информатика
от Дарья3335
Паскаль выдаёт ошибку 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;