Используя оператор if, вычислить заданное выражение для данных типа Integer

var x:integer;beginreadln(x);if x<-2 then writeln('f(',x,') = ',abs(2*x-2)) else if x<=5 then writeln('f(',x,') = ',sin(x)) else writeln('f(',x,') = ',x*x*x*x);end.Пример:-5f(-5) = 12