По представленной блок-схеме составьте программу вычисления функции y при заданном с клавиатуры значении х Паскаль

var x,y:real; begin write('x = '); readln(x); if x<=-20  then y:=3*x*x*x  else if x<=30 then y:=abs(x) else y:=30; writeln('y = ',y); end. Пример: x = -5 y = 5