"Primeras pruebas de Mathematicas"

"Punto y coma evita que se escriba una expresión o resultado"
"Primeras pruebas de Mathematicas";

"Puede hacerse operaciones elementales y calcular valores funcionales";

"Sumas, restas, productos y divisiones";
4.2345+2.19
4.2345-2.3555
4.2345*2.19
4.2345×2.19
4.2345/2.3611

"Potencias y radicales";
2.2^(2.5)
(2.2^2.5)
3.4754^(1/3)
(3.4754^(1/3))

"Logaritmos de diferentes bases, en base E, en base 10 o en otra base]";
Log10[10.0]
Log10[24576]
N[Log10[24576]]
N[Log10[24576],8]

"Mas sobre logaritmos"
Log[(E^2)]
Log[24576]
N[Log[24576],3]
Log[10,100]
Log[5,25]

"Calculo de valores de una expresión, Sqrt[(x^2)+7]/(2^2.5+Log[y])";
Sqrt[(x^2)+7]/(2^2.5+Log[y])
Sqrt[(x^2)+7]/(2^2.5+Log[y])/.x->2
Sqrt[(x^2)+7]/(2^2.5+Log[y])/.y->12
Sqrt[(x^2)+7]/(2^2.5+Log[y])/.{x->2,y->12}

"Representación de funciones, f[x_]=x^3";
f[x_]=x^3
Figura1=Plot[f[x],{x,-3,3},PlotRange->All]
Figura2=Plot[-f[x],{x,-3,3},PlotRange->All]
Show[Figura1, Figura2]

"Cálculo de derivadas de f[x_]=x^3 y representación";
g[x_]=D[f[x],x]
Figura2=Plot[g[x],{x,-3,3},PlotRange->All]
h[x_]=D[g[x],x]
Figura3=Plot[h[x],{x,-3,3},PlotRange->All]
Show[Figura1, Figura2, Figura3]

"Cálculo de derivadas parciales de h[x_,y_]=x^3+Log[y] y representación";
h[x_,y_]=x^3+Log[y]
Dhx[x_,y_]=D[h[x,y],x]
Dhy[x_,y_]=D[h[x,y],y]
Dhxx[x_,y_]=D[Dhx[x,y],x]
Dhyy[x_,y_]=D[Dhy[x,y],y]
Dhxy[x_,y_]=D[Dhx[x,y],y]
Dhyx[x_,y_]=D[Dhy[x,y],x]
Dhxy[x,y]-Dhyx[x,y]

"Obtención de raíces";
Plot[x^3+2*x^2+x+4,{x,-5,5},PlotRange->All]
FindRoot[x^3+2*x^2+4==0,{x,-2}]
FindRoot[x^3+2*x^2+4==0,{x,-4}]
"Notar que puede fallar el método"
FindRoot[x^3+2*x^2+4==0,{x,4}]

"Otro caso de cálculo de raíces"
Plot[-x^2+10,{x,-4,4},PlotRange->All]
FindRoot[-x^2+10==0,{x,-4}]
FindRoot[-x^2+10==0,{x,-1}]
FindRoot[-x^2+10==0,{x,2}]

"Cálculo de integrales indefinidas";
∫((x^2)+2)\[DifferentialD]x
∫((x^3)+(E^x)+2)\[DifferentialD]x
∫Log[x]\[DifferentialD]x

"Cálculo de integrales definidas"
(∫_2^5)((x^2)+2)\[DifferentialD]x
(∫_(-1)^7)((x^3)+(E^x)+2)\[DifferentialD]x
(∫_0.5^2)Log[x]\[DifferentialD]x