Помогите пожалуйста надо очень срочно прям вообще

Приложения:

Ответы

Ответ дал: Аноним
0
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.
Похожие вопросы