I can't figure out what the problem is, does the else error?

Question

Pascal

Program a;
varx,y:real;
begin
writeln('Enter number x');
read(x);
if x < 0 then;
y:=cos(2*x)+exp(x)
writeln('y=',y)
else
y:=7x/abs(2x-1);
writeln('y=',y);
end.

Answer 1

Program a;
var x,y:real;
begin
writeln ('Введите число x');
read(x);

if x < 0 then begin
  y:=cos(2*x)+exp(x)
  writeln('y=',y)
  end
else begin
  y:=7x/abs(2x-1);
  writeln(‘y=‘,y);
end;

end.

Like so)