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

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.