Exercício 4.3

> X:=vector(5,[1,1.1,1.2,1.3,1.4]):
fX:= vector(5,[1.000,1.233,1.552,1.993,2.611]):
p4x:=Lagrange(X,fX);
p4:=x->p4x:
plot(p4(x),x=1..1.4,title="Polinómio interpolador de Lagrange de grau 4");
LagrangePt(1.25,X,fX);