Пусть f(x) = . Построить график функции f(x), касательную к нему в точке x = .5 и нормаль в той же точке в одних осях
> restart:
> f:=x -> 3 - 2*x^2;
> D(f)(.5);
> f(.5);
> t:= x -> -2*(x - .5) + 2.5;
> n:= x -> (1/2)*(x - .5) + 2.5;
> plot({f(x), t(x), n(x)}, x = -1..1, color=[magenta,brown, wheat]);