Встречено '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', а ожидалось ')' - Pascal ABC»

textual
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.

15   голосов, оценка 3.867 из 5


СОХРАНИТЬ ССЫЛКУ