Получить квадратичное приближение для f (x) = 1/((1+x)^2) вблизи a = 1.

Построить графики функций f (x) и P (x) в одних осях вблизи 1.

Построить графики функций f (x) и P (x) в одних осях, но уж для достаточно большой области изменения х ; является ли P(x) хорошим приближением для данной функции вдали от 1?

Определить значения x , для которых квадратичное приближение "грешит" не более чем на 0.01.

Как может помочь графика при ответе на этот вопрос?

> f:= x -> 1/(1+x)^2;

f := proc (x) options operator, arrow; 1/((1+x)^2) ...

> f(1);

1/4

> D(f)(1);

-1/4

> D(D(f))(1);

3/8

> P:= x -> 0.25 - 0.25 * (x - 1) + (3/16) * ( x - 1)^2;

P := proc (x) options operator, arrow; .50-.25*x+3/...

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

[Maple Plot]

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

[Maple Plot]

Из приведенного выше графика следует, что P (x) НЕ являетмя хорошим приближением f (x) для x , далёких от 1.

Определим значения x , для которых | f(x) - P (x) | < 0.01, т.е.,

нас интересует случай, когда:

-0.01 < f (x) - P (x) < 0.01

или

f (x) - 0.01 < P (x) < f (x) + 0.01.

 

> g1:= x -> f(x) - 0.01;

g1 := proc (x) options operator, arrow; f(x)-.1e-1 ...

> g2:= x -> f(x) + 0.01;

g2 := proc (x) options operator, arrow; f(x)+.1e-1 ...

> plot({P(x), g1(x), g2(x)}, x = 0.5..3, color=[blue, brown, magenta]);

[Maple Plot]

> solve({-0.01 < f (x) - P (x), x > 0}, x );

{x < 1.469855700, 0. < x}

> solve({f (x) - P (x) < 0.01, x > 0}, x);

{.6072384172 < x}

Из графического и аналитического решения следует, что условие | P (x) - f (x) | < 0.01 выполняется для

x из промежутка ( .6072384172 , 1.469855700 ). Ответ, естественно, приближенный (но с высокой точностью).

 
 
Hosted by uCoz