Question

 f(x)={sin(x-2), x<-2P
       { x^3+x^2, x[-2p;p]   
       { 3-x, x>=P

Answer 1

var
  x, P: real;

begin
  readln(x, P);
  write('f(x) = ');
  if (x < -2 * P) then
    writeln(sin(x - 2))
  else
    if (x >= P) then
      writeln(P)
    else
      write(sqr(x) * (x + 1));
end.