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

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.

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку