Exercício 4.6 (5 dígitos)

> X:=vector(4,[1.10,1.05,1.15,1.00]);
fX:= vector(4,[0.2933,0.2414,0.3492,0.1924]);
PoliNewton(X,fX,6);
PoliNewtonPt(1.09,X,fX,6);

> DDivididas(1,2,X,fX,6);
DDivididas(2,3,X,fX,6);
DDivididas(3,4,X,fX,6);

> DDivididas(1,3,X,fX,6);
DDivididas(2,4,X,fX,6);

> DDivididas(1,4,X,fX,6);