Что здесь неправильно?

program superhotexe;
var x,y:real;
begin
writeln ('Введите x');
read(x);
if x<0 then y:=sqr(x)+5;
if x>0 then
else
y:=sqr(cos(x))*x;
writeln ('y=', y:6:2)
end.

woof1337    1   23.04.2020 16:23    0