Pascal ошибка 205

[blastka]

Дано такое задание

Написала программу через label и goto, пытаюсь разобрать как действует.

program example;

var s,n,t,x,e:real;
label l;
begin
writeln('x,e');
readln(x,e);
s:=-x;
n:=1;
t:=-x;
l:n:=n+1;
t:=t*x*(n*(-1));
if abs(t)<=e then
write('s=', s:8:3)
else begin s:=s+t;
goto l;
end;
readln;
end.

Выдает ошибку runtime error 205 at 00404155

[Аватар]

//t:=t*x*(n*(-1));
  t:=-t*x/n;

ЗЫ

Если это не баловство, а начало серьезного изучения программирования лучше сразу забыть о существовании меток