Ожидалось имя процедуры или функции var
c, a, Exp, u, y: real;
begin
write ('Введите c='); readln (c);
Exp:= 2.7;
a:= Exp*(-c) + c ;
u:= (a+c)/(a*c);
y:= cos(u) * exp(2/3*ln(1+(Sqr(sin(u+a;
writeln ('a = ' , a);
writeln ('u = ' , u);
writeln ('y = ' , y);
end.

исправить ошибку