# Ejercicio 07.6

kill(all)$

f(x):=6*x-x^2;

diff(f(x),x);

Df(x):=6-2*x;

Df(5);

eq1:y-5=(-4)*(x-5);
eq2:y-5=(1/4)*(x-5);

solve([eq1,x=0], [x,y]);
solve([eq2,x=0], [x,y]);

Base_triangulo=Bt:25 - 15/4;
Altura_triangulo=At:5;
Area_triangulo=(Bt * At)/2;