Пишет ошибку: ожидалось имя процедуры или функции. Что не так?

[alexameleon]

Program Logika;
var x,y,z,arctg: real;
L,A,B,C,D:boolean;
k:integer;
begin
cls;
writeLn('вводим x,y,z');
readLn(x,y,z);
writeLn('вводим k,');
readLn(k);
A:=(arctg(x/(sqrt(1-sqr(x))))+arctg(1/(sqrt(1-sqr(x))))=pi);
B:=FALSE;
C:=(x>y);
D:=(k div n>=3);
writeLn('A=',A,' B=',B,' C=',C,' D=',D);
L:= (A AND(C OR D))XOR(B OR A);
writeLn('L=',L);
end.

[Аватар]

arctg нет в паскале. Есть Arctan
n не определено
переменная arctg не нужна

[alexameleon]

Сообщение от Аватар

arctg нет в паскале. Есть Arctan
n не определено
переменная arctg не нужна

Спасибо, получилось.
Но когда ввела данные, снова вывел ошибку : неверная вещественная операция (строка 13)
Что делать?

[Вадим Мошев]

Может, вы вычисляете корень из отрицательного числа.

Кстати, переменная A у вас всегда будет равна FALSE