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

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.

Question

Информатика: Что здесь неправильно? 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.

Aldon15 · Answer

(if x 0 then) лишнее, удалите...

Что здесь неправильно? 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.

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

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.