Получить квадратичное приближение для функции f(x) = sec (x) при a = 0.

> restart:

> f:= x -> sec(x);

> f(0);

> D(f)(0);

> D(D(f))(0);

> P:= x -> 1 + 0.5 * (x)^2;

> plot({f(x),P(x)}, x = -1..1, color=[blue,brown]);