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

Ответы
Ответ дал:
0
Ответ:
(if x>0 then) лишнее, удалите
hodezero:
красная строка
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
2 года назад
8 лет назад