Встречено 'WRITELN', а ожидалось ')' - Pascal ABC

Формулировка задачи:

PROGRAM LVP;
VAR A:INTEGER;
B,x,y:READ;
BEGIN
WRITE('A= ');
READLN(A);
WRITE('B= ');READLN(B);
WRITE('x= ');READLN(x);
y:=ln(ABS(exp(3*ln(x-B))))*exp((1/3*ln(1+cos(exp(3*ln(x)))))*exp((5*SQR(A))*ln(2)))/5.5+(tan(SQR(B))*exp(3*ln(sin(x)))*SQRT(B)
WRITELN('y';y:6:2);
END.

Пишет что встречено 'WRITELN', а ожидалось ')'

Решение задачи: «Встречено 'WRITELN', а ожидалось ')'»

Листинг программы

PROGRAM LVP;
VAR A:INTEGER;
B,x,y:REAL;
BEGIN
WRITE('A= ');
READLN(A);
WRITE('B= ');READLN(B);
WRITE('x= ');READLN(x);
y:=ln(ABS(exp(3*ln(x-B))))*exp((1/3*ln(1+cos(exp(3*ln(x)))))*exp((5*SQR(A))*ln(2)))/5.5+(tan(SQR(B))*exp(3*ln(sin(x)))*SQRT(B));
WRITELN('y ',y:6:2);
END.

Объяснение кода листинга программы

Программа начинается с объявления переменных A, B и x типа INTEGER и y типа REAL.
Затем происходит запись в переменную A с помощью функции WRITE.
После этого происходит чтение из переменной A с помощью функции READLN.
Аналогично зачитывается значение переменной B.
Значение переменной x зачитывается с помощью функции READLN.
Переменная y инициализируется формулой, которая включает в себя функции ln, exp, sin, cos, sqrt, tan и операторы деления и умножения.
Значение переменной y записывается в консоль с помощью функции WRITELN.
Программа заканчивается.