> T:= n -> taylor(exp(x),x=0,n+1);

> for n from 0 to 10 do

> print(T(n));

> od;

> T(5);

> plot({exp(x),convert(T(1),polynom)},x=-10..10, y=-3..20,numpoints=500);

> Q := n -> taylor(sin(x),x=0,n+1);

> plot({sin(x),convert(Q(10),polynom)},x=-12..12, y=-2..2,numpoints=500);

> Q(1);

> Q(2);

> Q(3);

> Q(10);

> T:= n -> taylor(cos(x),x=Pi/4,n+1);

> T(3);

>