Ответ(ы) на вопрос:
Var
x,y:real;
begin
Read(x);
if x<3 then y:=-x
else
if x=3 then y:=x+1
else
if x<=5 then y:=x/2
else { этв ветка не определена условием, нельзя задавать x>5 };
Writeln(y)
end.
Не нашли ответ?
Похожие вопросы