Сделаем маленькое преобразование: (x³-x²)/4 = x²(x-1)/4
Это потому, что создатель Паскаля, Н.Вирт, перемудрил, не пожелав снабдить язык операцией возведения в степень, только квадрат определил.

var
  x,y:real;
begin
  x:=-3;
  while x<=3 do begin
    if x<-1 then y:=sqr(sin(x))
    else
      if x>1 then y:=cos(x/2)
      else y:=x*x*(x-1)/4;
    Writeln('X=',x:5:2,', Y=',y);
    x:=x+0.25
    end
end.

Результаты
X=-3.00, Y=0.019914856674817
X=-2.75, Y=0.14566511285437
X=-2.50, Y=0.358168907268387
X=-2.25, Y=0.60539789971539
X=-2.00, Y=0.826821810431806
X=-1.75, Y=0.968228343645398
X=-1.50, Y=0.994996248300223
X=-1.25, Y=0.900571807773467
X=-1.00, Y=-0.5
X=-0.75, Y=-0.24609375
X=-0.50, Y=-0.09375
X=-0.25, Y=-0.01953125
X= 0.00, Y=0
X= 0.25, Y=-0.01171875
X= 0.50, Y=-0.03125
X= 0.75, Y=-0.03515625
X= 1.00, Y=0
X= 1.25, Y=0.810963119505218
X= 1.50, Y=0.731688868873821
X= 1.75, Y=0.640996858163325
X= 2.00, Y=0.54030230586814
X= 2.25, Y=0.431176516798666
X= 2.50, Y=0.315322362395269
X= 2.75, Y=0.194547707988987
X= 3.00, Y=0.0707372016677029