#ejercicio 2
encontrar una exprecion para hogof donde
f(x)=sqrt(x+1)
g(x)= x**4+2x**2+1
h(x)=x/(x**2+1)#
> f:=x->sqrt(x+1);
f := x -> sqrt(x + 1)
> g:=x->x**4+3*x**2+1;
4 2
g := x -> x + 3 x + 1
> h:=x->x/(x**2+1);
x
h := x -> ------
2
x + 1
> f := proc (x) options operator, arrow; sqrt(x+1) end proc;
f := x -> sqrt(x + 1)
> (h@g@f)(x);
2
(x + 1) + 3 x + 4
-------------------------
2 2
((x + 1) + 3 x + 4) + 1
#obtener las raices del polinomio#
> ecuacion:=(x**4+x**3-7*x**2-x+6):
>
> factor(ecuacion);
(x - 1) (x - 2) (x + 3) (x + 1)
>
(x - 1) (x - 2) (x + 3) (x + 1)
> solve(ecuacion);
-1, 1, 2, -3
> plot(ecuacion,x=-4..3,y=-13..9);
>