Помогите пожалуйста надо очень срочно прям вообще
Помогите пожалуйста надо очень срочно прям вообще
Гость
Ответ(ы) на вопрос:
Гостьvar
x,y:real;
begin
Read(x);
if x<=-20 then y:=3*x*x*x
else
if x<=30 then y:=abs(x) else y:=30;
Writeln(y)
end.
Не нашли ответ?
Похожие вопросы