последовательность функции

[vadimc]

PASCAL ABC
на х стоит условие что он меньше>-1 ,но когда я ввожу х например -2,-3 и тд.в 11 строке вылазиет ошибка :неверная вещественная операция . помогите пожалуйста это исправить
1.var t,x,n,i:integer;
2.y:real;
3.begin
4.readln(x); //считываем икс для функции арктангенс от икс
5.writeln('y=',arctan(x)); //вывели и посчитали арктангенс от икс
6.writeln('введите икс и n-(кол-во членов)');
7.readln(x); //считываем икс для следующей функции
8.readln(n); //считываем значение кол-вo челенов в функции
9.y:=-pi/2; //присваеваем значение пи делить на 2 т.к. первый член ему равен!
10.for i:=0 to n do //высчитываем значиние каждого члена
11.y:=y+(Exp((n+1)*ln(1))/((2*n+1)*Exp((2*n+1)*ln(x)))); //вычисление каждого члена
12.writeln (y); //вывод значения функции
13.end.