<?xml version="1.0"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="es">
	<id>https://www.glc.us.es/~jalonso/SLEAM2010/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=Macaglez</id>
	<title>Software Libre para la Enseñanza y el Aprendizaje de las Matemáticas (2010-11) - Contribuciones del usuario [es]</title>
	<link rel="self" type="application/atom+xml" href="https://www.glc.us.es/~jalonso/SLEAM2010/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=Macaglez"/>
	<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php/Especial:Contribuciones/Macaglez"/>
	<updated>2026-07-18T04:50:38Z</updated>
	<subtitle>Contribuciones del usuario</subtitle>
	<generator>MediaWiki 1.31.0</generator>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=763</id>
		<title>Ejercicios 2: Funciones de una variable</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=763"/>
		<updated>2011-04-07T13:18:19Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 2.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;if...then...else&amp;#039;&amp;#039;, &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;, &amp;#039;&amp;#039;limit&amp;#039;&amp;#039;, &amp;#039;&amp;#039;forget&amp;#039;&amp;#039;,  &amp;#039;&amp;#039;plot2d&amp;#039;&amp;#039;, &amp;#039;&amp;#039;diff&amp;#039;&amp;#039;, &amp;#039;&amp;#039;define&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigexpand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigsimp&amp;#039;&amp;#039; y &amp;#039;&amp;#039;subst&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
Sean &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; dos números reales. Se considera la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; definida sobre los números reales por&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
f(x)=\left\{&lt;br /&gt;
\begin{array}{lll}&lt;br /&gt;
  \dfrac{e^x-1}{x}  &amp;amp;\mbox{si} &amp;amp; x&amp;gt;0\\&lt;br /&gt;
  a\,x+b           &amp;amp;\mbox{si} &amp;amp; x\leq 0&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.1 === &lt;br /&gt;
Definir la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; usando el condicional &amp;#039;&amp;#039;if ... then ... else&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1)d(x):=if x&amp;gt;0 then (e^x-1)/x else ax+b;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1.2 == &lt;br /&gt;
&amp;#039;&amp;#039;limit&amp;#039;&amp;#039; no puede evaluar expresiones del tipo &amp;#039;&amp;#039;if...then&amp;#039;&amp;#039;. Por ello, para determinar el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha se necesita precisar en qué intervalo se encuentra &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt;. Esto puede hacerse con la función &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
Escribir la expresión &amp;#039;&amp;#039;assume(x&amp;gt;0)&amp;#039;&amp;#039;, después calcular el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha. Se puede eliminar la hipótesis sobre &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; con &amp;#039;&amp;#039;forget(x&amp;gt;0)&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.3 === &lt;br /&gt;
Deducir el valor de &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es continua en &amp;lt;math&amp;gt;\mathbb{R}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
f(x) se trata de una función a trozos tal que:&amp;lt;br/&amp;gt;&lt;br /&gt;
1. Para x &amp;gt; 0, f(x) es un cociente entre funciones continuas en R, por tanto, podrá presentar problemas de discontinuidad en los puntos en los que su denominador se anula, eso sólo ocurre para x=0, pero en ese punto, f(x) presenta otro comportamiento.&amp;lt;br/&amp;gt;&lt;br /&gt;
2. Para x&amp;lt;= 0, f(x) es una función lineal, y por tanto, continua en todo R.&amp;lt;br/&amp;gt;&lt;br /&gt;
Por consiguiente, el único punto en el que la función a trozos puede presentar problemas es donde cambia de criterio, en x = 0.&lt;br /&gt;
Para que f(x) sea continua en x = 0, deben ser iguales los límites laterales de la función en dicho punto:&lt;br /&gt;
 solve(limit((exp(x)-1)/x,x,0)=limit(a*x+b,x,0));&lt;br /&gt;
Devolviéndonos que b = 1.&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.4 === &lt;br /&gt;
Calcular la derivada de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.5 === &lt;br /&gt;
Calcular el valor de &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es derivable en cero.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039; &lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; la función real definida por &amp;lt;math&amp;gt;g(x) = 2x-\sqrt{1+x^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
 (%i1)g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.1 === &lt;br /&gt;
Calcular los límites de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; en más y menos infinito.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%01) g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
 (%02) limit(g(x),x,inf);&lt;br /&gt;
 (%02) inf&lt;br /&gt;
 (%03) limit(g(x),x,-inf);&lt;br /&gt;
 (%03) -inf&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; inf, -inf&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.2 === &lt;br /&gt;
Dibujar la gráfica de la función &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%o4) wxplot2d(g(x), [x,-1,3],[y,-3,3]);[gnuplot_preamble, &amp;quot;set grid &amp;quot;])$&lt;br /&gt;
 plot2d: some values were clipped.&lt;br /&gt;
 (%t05)  &amp;lt;&amp;lt; Graphics &amp;gt;&amp;gt; &lt;br /&gt;
 [[Archivo:Grafica_2x-sqrt1+x^2.png]]&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.3 === &lt;br /&gt;
Calcular &amp;lt;math&amp;gt;g&amp;#039;(x)&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) g(x):= 2*x-sqrt(1+x^2);&lt;br /&gt;
 (%i2)diff(g(x),x);&lt;br /&gt;
 (%02)2-x/sqrt(x^2+1);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.4 ===&lt;br /&gt;
Resolver la ecuación &amp;lt;math&amp;gt;g(x)=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) g(x):= 2*x-sqrt(1+x^2);&lt;br /&gt;
 (%i2) g(0);&lt;br /&gt;
 (%02) -1&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.5 === &lt;br /&gt;
Determinar los intervalos de crecimiento de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.6 === &lt;br /&gt;
Calcular las ecuaciones reducidas de las asíntotas de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
=== Ejercicio 3.1 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(3t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 (%i1) trigexpand(cos(3*t));&lt;br /&gt;
 (%o1) cos(t)^3-3*cos(t)*sin(t)^2&lt;br /&gt;
 (%i2) trigsimp(%);&lt;br /&gt;
 (%o2) 4*cos(t)^3-3*cos(t)&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.2 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(4t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 (%i3) trigexpand(cos(4*t));&lt;br /&gt;
 (%o3) sin(t)^4-6*cos(t)^2*sin(t)^2+cos(t)^4&lt;br /&gt;
 (%i4) trigsimp(%);&lt;br /&gt;
 (%o4) 8*cos(t)^4-8*cos(t)^2+1&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.3 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(5t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 (%i5) trigexpand(cos(5*t));&lt;br /&gt;
 (%o5) 5*cos(t)*sin(t)^4-10*cos(t)^3*sin(t)^2+cos(t)^5&lt;br /&gt;
 (%i6) trigsimp(%);&lt;br /&gt;
 (%o6) 16*cos(t)^5-20*cos(t)^3+5*cos(t)&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.4 === &lt;br /&gt;
Determinar los polinomios &amp;lt;math&amp;gt;T_n&amp;lt;/math&amp;gt; de la variable &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; tales que para todo &amp;lt;math&amp;gt;t \in \mathbb{R}&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;cos(nt) = T_n(cos\ t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;n \in \{3,4,5\}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i12) T3(x) := 4*x^3-3*x;&lt;br /&gt;
 (%o12) T3(x):=4*x^3-3*x&lt;br /&gt;
 (%i13) T4(x) := 8*x^4-8*x^2+1;&lt;br /&gt;
 (%o13) T4(x):=8*x^4-8*x^2+1&lt;br /&gt;
 (%i14) T5(x) := 16*x^5-20*x^3+5*x;&lt;br /&gt;
 (%o14) T5(x):=16*x^5-20*x^3+5*x&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.5 === &lt;br /&gt;
Representar las funciones &amp;lt;math&amp;gt;T_3&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;T_4&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;T_5&amp;lt;/math&amp;gt; en la misma gráfica.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 --&amp;gt; plot2d([T3(x),T4(x), T5(x)], [x,-1,1])$&lt;br /&gt;
 (%i15) wxplot2d([T3(x),T4(x), T5(x)], [x,-1,1])$&lt;br /&gt;
 (%t15)(sale el dibujo de la gráfica en Maxima)&lt;br /&gt;
[[Archivo:imagen ejercicio 3.5.jpg]]&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=762</id>
		<title>Ejercicios 2: Funciones de una variable</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=762"/>
		<updated>2011-04-07T13:17:51Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 2.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;if...then...else&amp;#039;&amp;#039;, &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;, &amp;#039;&amp;#039;limit&amp;#039;&amp;#039;, &amp;#039;&amp;#039;forget&amp;#039;&amp;#039;,  &amp;#039;&amp;#039;plot2d&amp;#039;&amp;#039;, &amp;#039;&amp;#039;diff&amp;#039;&amp;#039;, &amp;#039;&amp;#039;define&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigexpand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigsimp&amp;#039;&amp;#039; y &amp;#039;&amp;#039;subst&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
Sean &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; dos números reales. Se considera la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; definida sobre los números reales por&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
f(x)=\left\{&lt;br /&gt;
\begin{array}{lll}&lt;br /&gt;
  \dfrac{e^x-1}{x}  &amp;amp;\mbox{si} &amp;amp; x&amp;gt;0\\&lt;br /&gt;
  a\,x+b           &amp;amp;\mbox{si} &amp;amp; x\leq 0&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.1 === &lt;br /&gt;
Definir la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; usando el condicional &amp;#039;&amp;#039;if ... then ... else&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1)d(x):=if x&amp;gt;0 then (e^x-1)/x else ax+b;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1.2 == &lt;br /&gt;
&amp;#039;&amp;#039;limit&amp;#039;&amp;#039; no puede evaluar expresiones del tipo &amp;#039;&amp;#039;if...then&amp;#039;&amp;#039;. Por ello, para determinar el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha se necesita precisar en qué intervalo se encuentra &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt;. Esto puede hacerse con la función &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
Escribir la expresión &amp;#039;&amp;#039;assume(x&amp;gt;0)&amp;#039;&amp;#039;, después calcular el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha. Se puede eliminar la hipótesis sobre &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; con &amp;#039;&amp;#039;forget(x&amp;gt;0)&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.3 === &lt;br /&gt;
Deducir el valor de &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es continua en &amp;lt;math&amp;gt;\mathbb{R}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
f(x) se trata de una función a trozos tal que:&amp;lt;br/&amp;gt;&lt;br /&gt;
1. Para x &amp;gt; 0, f(x) es un cociente entre funciones continuas en R, por tanto, podrá presentar problemas de discontinuidad en los puntos en los que su denominador se anula, eso sólo ocurre para x=0, pero en ese punto, f(x) presenta otro comportamiento.&amp;lt;br/&amp;gt;&lt;br /&gt;
2. Para x&amp;lt;= 0, f(x) es una función lineal, y por tanto, continua en todo R.&amp;lt;br/&amp;gt;&lt;br /&gt;
Por consiguiente, el único punto en el que la función a trozos puede presentar problemas es donde cambia de criterio, en x = 0.&lt;br /&gt;
Para que f(x) sea continua en x = 0, deben ser iguales los límites laterales de la función en dicho punto:&lt;br /&gt;
 solve(limit((exp(x)-1)/x,x,0)=limit(a*x+b,x,0));&lt;br /&gt;
Devolviéndonos que b = 1.&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.4 === &lt;br /&gt;
Calcular la derivada de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.5 === &lt;br /&gt;
Calcular el valor de &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es derivable en cero.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039; &lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; la función real definida por &amp;lt;math&amp;gt;g(x) = 2x-\sqrt{1+x^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
 (%i1)g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.1 === &lt;br /&gt;
Calcular los límites de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; en más y menos infinito.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%01) g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
 (%02) limit(g(x),x,inf);&lt;br /&gt;
 (%02) inf&lt;br /&gt;
 (%03) limit(g(x),x,-inf);&lt;br /&gt;
 (%03) -inf&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; inf, -inf&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.2 === &lt;br /&gt;
Dibujar la gráfica de la función &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%o4) wxplot2d(g(x), [x,-2,2],[y,-3,3]);[gnuplot_preamble, &amp;quot;set grid &amp;quot;])$&lt;br /&gt;
 plot2d: some values were clipped.&lt;br /&gt;
 (%t05)  &amp;lt;&amp;lt; Graphics &amp;gt;&amp;gt; &lt;br /&gt;
 [[Archivo:Grafica_2x-sqrt1+x^2.png]]&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.3 === &lt;br /&gt;
Calcular &amp;lt;math&amp;gt;g&amp;#039;(x)&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) g(x):= 2*x-sqrt(1+x^2);&lt;br /&gt;
 (%i2)diff(g(x),x);&lt;br /&gt;
 (%02)2-x/sqrt(x^2+1);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.4 ===&lt;br /&gt;
Resolver la ecuación &amp;lt;math&amp;gt;g(x)=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) g(x):= 2*x-sqrt(1+x^2);&lt;br /&gt;
 (%i2) g(0);&lt;br /&gt;
 (%02) -1&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.5 === &lt;br /&gt;
Determinar los intervalos de crecimiento de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.6 === &lt;br /&gt;
Calcular las ecuaciones reducidas de las asíntotas de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
=== Ejercicio 3.1 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(3t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 (%i1) trigexpand(cos(3*t));&lt;br /&gt;
 (%o1) cos(t)^3-3*cos(t)*sin(t)^2&lt;br /&gt;
 (%i2) trigsimp(%);&lt;br /&gt;
 (%o2) 4*cos(t)^3-3*cos(t)&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.2 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(4t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 (%i3) trigexpand(cos(4*t));&lt;br /&gt;
 (%o3) sin(t)^4-6*cos(t)^2*sin(t)^2+cos(t)^4&lt;br /&gt;
 (%i4) trigsimp(%);&lt;br /&gt;
 (%o4) 8*cos(t)^4-8*cos(t)^2+1&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.3 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(5t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 (%i5) trigexpand(cos(5*t));&lt;br /&gt;
 (%o5) 5*cos(t)*sin(t)^4-10*cos(t)^3*sin(t)^2+cos(t)^5&lt;br /&gt;
 (%i6) trigsimp(%);&lt;br /&gt;
 (%o6) 16*cos(t)^5-20*cos(t)^3+5*cos(t)&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.4 === &lt;br /&gt;
Determinar los polinomios &amp;lt;math&amp;gt;T_n&amp;lt;/math&amp;gt; de la variable &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; tales que para todo &amp;lt;math&amp;gt;t \in \mathbb{R}&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;cos(nt) = T_n(cos\ t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;n \in \{3,4,5\}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i12) T3(x) := 4*x^3-3*x;&lt;br /&gt;
 (%o12) T3(x):=4*x^3-3*x&lt;br /&gt;
 (%i13) T4(x) := 8*x^4-8*x^2+1;&lt;br /&gt;
 (%o13) T4(x):=8*x^4-8*x^2+1&lt;br /&gt;
 (%i14) T5(x) := 16*x^5-20*x^3+5*x;&lt;br /&gt;
 (%o14) T5(x):=16*x^5-20*x^3+5*x&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.5 === &lt;br /&gt;
Representar las funciones &amp;lt;math&amp;gt;T_3&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;T_4&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;T_5&amp;lt;/math&amp;gt; en la misma gráfica.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 --&amp;gt; plot2d([T3(x),T4(x), T5(x)], [x,-1,1])$&lt;br /&gt;
 (%i15) wxplot2d([T3(x),T4(x), T5(x)], [x,-1,1])$&lt;br /&gt;
 (%t15)(sale el dibujo de la gráfica en Maxima)&lt;br /&gt;
[[Archivo:imagen ejercicio 3.5.jpg]]&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Archivo:Grafica_2x-sqrt1%2Bx%5E2.png&amp;diff=761</id>
		<title>Archivo:Grafica 2x-sqrt1+x^2.png</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Archivo:Grafica_2x-sqrt1%2Bx%5E2.png&amp;diff=761"/>
		<updated>2011-04-07T13:16:14Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=703</id>
		<title>Ejercicios 2: Funciones de una variable</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=703"/>
		<updated>2011-04-05T14:22:28Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 2.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;if...then...else&amp;#039;&amp;#039;, &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;, &amp;#039;&amp;#039;limit&amp;#039;&amp;#039;, &amp;#039;&amp;#039;forget&amp;#039;&amp;#039;,  &amp;#039;&amp;#039;plot2d&amp;#039;&amp;#039;, &amp;#039;&amp;#039;diff&amp;#039;&amp;#039;, &amp;#039;&amp;#039;define&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigexpand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigsimp&amp;#039;&amp;#039; y &amp;#039;&amp;#039;subst&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
Sean &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; dos números reales. Se considera la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; definida sobre los números reales por&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
f(x)=\left\{&lt;br /&gt;
\begin{array}{lll}&lt;br /&gt;
  \dfrac{e^x-1}{x}  &amp;amp;\mbox{si} &amp;amp; x&amp;gt;0\\&lt;br /&gt;
  a\,x+b           &amp;amp;\mbox{si} &amp;amp; x\leq 0&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.1 === &lt;br /&gt;
Definir la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; usando el condicional &amp;#039;&amp;#039;if ... then ... else&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1)d(x):=if x&amp;gt;0 then (e^x-1)/x else ax+b;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1.2 == &lt;br /&gt;
&amp;#039;&amp;#039;limit&amp;#039;&amp;#039; no puede evaluar expresiones del tipo &amp;#039;&amp;#039;if...then&amp;#039;&amp;#039;. Por ello, para determinar el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha se necesita precisar en qué intervalo se encuentra &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt;. Esto puede hacerse con la función &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
Escribir la expresión &amp;#039;&amp;#039;assume(x&amp;gt;0)&amp;#039;&amp;#039;, después calcular el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha. Se puede eliminar la hipótesis sobre &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; con &amp;#039;&amp;#039;forget(x&amp;gt;0)&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.3 === &lt;br /&gt;
Deducir el valor de &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es continua en &amp;lt;math&amp;gt;\mathbb{R}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.4 === &lt;br /&gt;
Calcular la derivada de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.5 === &lt;br /&gt;
Calcular el valor de &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es derivable en cero.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039; &lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; la función real definida por &amp;lt;math&amp;gt;g(x) = 2x-\sqrt{1+x^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
 (%i1)g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.1 === &lt;br /&gt;
Calcular los límites de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; en más y menos infinito.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%01) g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
 (%02) limit(g(x),x,inf);&lt;br /&gt;
 (%02) inf&lt;br /&gt;
 (%03) limit(g(x),x,-inf);&lt;br /&gt;
 (%03) -inf&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; inf, -inf&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.2 === &lt;br /&gt;
Dibujar la gráfica de la función &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%o4) wxplot2d(g(x), [x,-2,2],[y,-3,3]);[gnuplot_preamble, &amp;quot;set grid &amp;quot;])$&lt;br /&gt;
 plot2d: some values were clipped.&lt;br /&gt;
 (%t05)  &amp;lt;&amp;lt; Graphics &amp;gt;&amp;gt; &lt;br /&gt;
No sale la gráfica.&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.3 === &lt;br /&gt;
Calcular &amp;lt;math&amp;gt;g&amp;#039;(x)&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.4 ===&lt;br /&gt;
Resolver la ecuación &amp;lt;math&amp;gt;g(x)=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.5 === &lt;br /&gt;
Determinar los intervalos de crecimiento de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.6 === &lt;br /&gt;
Calcular las ecuaciones reducidas de las asíntotas de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
=== Ejercicio 3.1 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(3t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.2 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(4t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.3 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(5t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.4 === &lt;br /&gt;
Determinar los polinomios &amp;lt;math&amp;gt;T_n&amp;lt;/math&amp;gt; de la variable &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; tales que para todo &amp;lt;math&amp;gt;t \in \mathbb{R}&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;cos(nt) = T_n(cos\ t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;n \in \{3,4,5\}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.5 === &lt;br /&gt;
Representar las funciones &amp;lt;math&amp;gt;T_3&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;T_4&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;T_5&amp;lt;/math&amp;gt; en la misma gráfica.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=702</id>
		<title>Ejercicios 2: Funciones de una variable</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=702"/>
		<updated>2011-04-05T14:22:13Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 2.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;if...then...else&amp;#039;&amp;#039;, &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;, &amp;#039;&amp;#039;limit&amp;#039;&amp;#039;, &amp;#039;&amp;#039;forget&amp;#039;&amp;#039;,  &amp;#039;&amp;#039;plot2d&amp;#039;&amp;#039;, &amp;#039;&amp;#039;diff&amp;#039;&amp;#039;, &amp;#039;&amp;#039;define&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigexpand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigsimp&amp;#039;&amp;#039; y &amp;#039;&amp;#039;subst&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
Sean &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; dos números reales. Se considera la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; definida sobre los números reales por&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
f(x)=\left\{&lt;br /&gt;
\begin{array}{lll}&lt;br /&gt;
  \dfrac{e^x-1}{x}  &amp;amp;\mbox{si} &amp;amp; x&amp;gt;0\\&lt;br /&gt;
  a\,x+b           &amp;amp;\mbox{si} &amp;amp; x\leq 0&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.1 === &lt;br /&gt;
Definir la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; usando el condicional &amp;#039;&amp;#039;if ... then ... else&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1)d(x):=if x&amp;gt;0 then (e^x-1)/x else ax+b;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1.2 == &lt;br /&gt;
&amp;#039;&amp;#039;limit&amp;#039;&amp;#039; no puede evaluar expresiones del tipo &amp;#039;&amp;#039;if...then&amp;#039;&amp;#039;. Por ello, para determinar el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha se necesita precisar en qué intervalo se encuentra &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt;. Esto puede hacerse con la función &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
Escribir la expresión &amp;#039;&amp;#039;assume(x&amp;gt;0)&amp;#039;&amp;#039;, después calcular el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha. Se puede eliminar la hipótesis sobre &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; con &amp;#039;&amp;#039;forget(x&amp;gt;0)&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.3 === &lt;br /&gt;
Deducir el valor de &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es continua en &amp;lt;math&amp;gt;\mathbb{R}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.4 === &lt;br /&gt;
Calcular la derivada de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.5 === &lt;br /&gt;
Calcular el valor de &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es derivable en cero.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039; &lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; la función real definida por &amp;lt;math&amp;gt;g(x) = 2x-\sqrt{1+x^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
 (%i1)g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.1 === &lt;br /&gt;
Calcular los límites de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; en más y menos infinito.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%01) g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
 (%02) limit(g(x),x,inf);&lt;br /&gt;
 (%02) inf&lt;br /&gt;
 (%03) limit(g(x),x,-inf);&lt;br /&gt;
 (%03) -inf&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; inf, -inf&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.2 === &lt;br /&gt;
Dibujar la gráfica de la función &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%o6) wxplot2d(g(x), [x,-2,2],[y,-3,3]);[gnuplot_preamble, &amp;quot;set grid &amp;quot;])$&lt;br /&gt;
 plot2d: some values were clipped.&lt;br /&gt;
 (%t07)  &amp;lt;&amp;lt; Graphics &amp;gt;&amp;gt; &lt;br /&gt;
No sale la gráfica.&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.3 === &lt;br /&gt;
Calcular &amp;lt;math&amp;gt;g&amp;#039;(x)&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.4 ===&lt;br /&gt;
Resolver la ecuación &amp;lt;math&amp;gt;g(x)=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.5 === &lt;br /&gt;
Determinar los intervalos de crecimiento de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.6 === &lt;br /&gt;
Calcular las ecuaciones reducidas de las asíntotas de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
=== Ejercicio 3.1 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(3t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.2 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(4t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.3 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(5t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.4 === &lt;br /&gt;
Determinar los polinomios &amp;lt;math&amp;gt;T_n&amp;lt;/math&amp;gt; de la variable &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; tales que para todo &amp;lt;math&amp;gt;t \in \mathbb{R}&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;cos(nt) = T_n(cos\ t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;n \in \{3,4,5\}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.5 === &lt;br /&gt;
Representar las funciones &amp;lt;math&amp;gt;T_3&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;T_4&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;T_5&amp;lt;/math&amp;gt; en la misma gráfica.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=696</id>
		<title>Ejercicios 2: Funciones de una variable</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=696"/>
		<updated>2011-04-05T14:11:08Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 2.1 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;if...then...else&amp;#039;&amp;#039;, &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;, &amp;#039;&amp;#039;limit&amp;#039;&amp;#039;, &amp;#039;&amp;#039;forget&amp;#039;&amp;#039;,  &amp;#039;&amp;#039;plot2d&amp;#039;&amp;#039;, &amp;#039;&amp;#039;diff&amp;#039;&amp;#039;, &amp;#039;&amp;#039;define&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigexpand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigsimp&amp;#039;&amp;#039; y &amp;#039;&amp;#039;subst&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
Sean &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; dos números reales. Se considera la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; definida sobre los números reales por&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
f(x)=\left\{&lt;br /&gt;
\begin{array}{lll}&lt;br /&gt;
  \dfrac{e^x-1}{x}  &amp;amp;\mbox{si} &amp;amp; x&amp;gt;0\\&lt;br /&gt;
  a\,x+b           &amp;amp;\mbox{si} &amp;amp; x\leq 0&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.1 === &lt;br /&gt;
Definir la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; usando el condicional &amp;#039;&amp;#039;if ... then ... else&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1.2 == &lt;br /&gt;
&amp;#039;&amp;#039;limit&amp;#039;&amp;#039; no puede evaluar expresiones del tipo &amp;#039;&amp;#039;if...then&amp;#039;&amp;#039;. Por ello, para determinar el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha se necesita precisar en qué intervalo se encuentra &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt;. Esto puede hacerse con la función &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
Escribir la expresión &amp;#039;&amp;#039;assume(x&amp;gt;0)&amp;#039;&amp;#039;, después calcular el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha. Se puede eliminar la hipótesis sobre &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; con &amp;#039;&amp;#039;forget(x&amp;gt;0)&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.3 === &lt;br /&gt;
Deducir el valor de &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es continua en &amp;lt;math&amp;gt;\mathbb{R}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.4 === &lt;br /&gt;
Calcular la derivada de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.5 === &lt;br /&gt;
Calcular el valor de &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es derivable en cero.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039; &lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; la función real definida por &amp;lt;math&amp;gt;g(x) = 2x-\sqrt{1+x^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
 (%i1)g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.1 === &lt;br /&gt;
Calcular los límites de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; en más y menos infinito.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%01) g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
 (%02) limit(g(x),x,inf);&lt;br /&gt;
 (%02) inf&lt;br /&gt;
 (%03) limit(g(x),x,-inf);&lt;br /&gt;
 (%03) -inf&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; inf, -inf&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.2 === &lt;br /&gt;
Dibujar la gráfica de la función &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.3 === &lt;br /&gt;
Calcular &amp;lt;math&amp;gt;g&amp;#039;(x)&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.4 ===&lt;br /&gt;
Resolver la ecuación &amp;lt;math&amp;gt;g(x)=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.5 === &lt;br /&gt;
Determinar los intervalos de crecimiento de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.6 === &lt;br /&gt;
Calcular las ecuaciones reducidas de las asíntotas de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
=== Ejercicio 3.1 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(3t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.2 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(4t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.3 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(5t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.4 === &lt;br /&gt;
Determinar los polinomios &amp;lt;math&amp;gt;T_n&amp;lt;/math&amp;gt; de la variable &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; tales que para todo &amp;lt;math&amp;gt;t \in \mathbb{R}&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;cos(nt) = T_n(cos\ t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;n \in \{3,4,5\}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.5 === &lt;br /&gt;
Representar las funciones &amp;lt;math&amp;gt;T_3&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;T_4&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;T_5&amp;lt;/math&amp;gt; en la misma gráfica.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=695</id>
		<title>Ejercicios 2: Funciones de una variable</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_2:_Funciones_de_una_variable&amp;diff=695"/>
		<updated>2011-04-05T14:07:54Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 2.1 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;if...then...else&amp;#039;&amp;#039;, &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;, &amp;#039;&amp;#039;limit&amp;#039;&amp;#039;, &amp;#039;&amp;#039;forget&amp;#039;&amp;#039;,  &amp;#039;&amp;#039;plot2d&amp;#039;&amp;#039;, &amp;#039;&amp;#039;diff&amp;#039;&amp;#039;, &amp;#039;&amp;#039;define&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigexpand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;trigsimp&amp;#039;&amp;#039; y &amp;#039;&amp;#039;subst&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
Sean &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; dos números reales. Se considera la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; definida sobre los números reales por&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
f(x)=\left\{&lt;br /&gt;
\begin{array}{lll}&lt;br /&gt;
  \dfrac{e^x-1}{x}  &amp;amp;\mbox{si} &amp;amp; x&amp;gt;0\\&lt;br /&gt;
  a\,x+b           &amp;amp;\mbox{si} &amp;amp; x\leq 0&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.1 === &lt;br /&gt;
Definir la función &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; usando el condicional &amp;#039;&amp;#039;if ... then ... else&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1.2 == &lt;br /&gt;
&amp;#039;&amp;#039;limit&amp;#039;&amp;#039; no puede evaluar expresiones del tipo &amp;#039;&amp;#039;if...then&amp;#039;&amp;#039;. Por ello, para determinar el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha se necesita precisar en qué intervalo se encuentra &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt;. Esto puede hacerse con la función &amp;#039;&amp;#039;assume&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
Escribir la expresión &amp;#039;&amp;#039;assume(x&amp;gt;0)&amp;#039;&amp;#039;, después calcular el límite de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha. Se puede eliminar la hipótesis sobre &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; con &amp;#039;&amp;#039;forget(x&amp;gt;0)&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.3 === &lt;br /&gt;
Deducir el valor de &amp;lt;math&amp;gt;b&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es continua en &amp;lt;math&amp;gt;\mathbb{R}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.4 === &lt;br /&gt;
Calcular la derivada de &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; en cero por la derecha.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.5 === &lt;br /&gt;
Calcular el valor de &amp;lt;math&amp;gt;a&amp;lt;/math&amp;gt; para el que &amp;lt;math&amp;gt;f&amp;lt;/math&amp;gt; es derivable en cero.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039; &lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; la función real definida por &amp;lt;math&amp;gt;g(x) = 2x-\sqrt{1+x^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
 (%i1)g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.1 === &lt;br /&gt;
Calcular los límites de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt; en más y menos infinito.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%01) g(x):= 2*x-sqrt(1+x^2)$&lt;br /&gt;
 (%02) limit(g(x),x,inf);&lt;br /&gt;
 (%02) inf&lt;br /&gt;
 (%03) limit(g(x),x,-inf);&lt;br /&gt;
 (%03) -inf&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.2 === &lt;br /&gt;
Dibujar la gráfica de la función &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.3 === &lt;br /&gt;
Calcular &amp;lt;math&amp;gt;g&amp;#039;(x)&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.4 ===&lt;br /&gt;
Resolver la ecuación &amp;lt;math&amp;gt;g(x)=0&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.5 === &lt;br /&gt;
Determinar los intervalos de crecimiento de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 2.6 === &lt;br /&gt;
Calcular las ecuaciones reducidas de las asíntotas de &amp;lt;math&amp;gt;g&amp;lt;/math&amp;gt;.&lt;br /&gt;
 &lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
=== Ejercicio 3.1 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(3t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.2 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(4t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.3 === &lt;br /&gt;
Desarrollar &amp;lt;math&amp;gt;cos(5t)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;cos(t)&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.4 === &lt;br /&gt;
Determinar los polinomios &amp;lt;math&amp;gt;T_n&amp;lt;/math&amp;gt; de la variable &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; tales que para todo &amp;lt;math&amp;gt;t \in \mathbb{R}&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;cos(nt) = T_n(cos\ t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;n \in \{3,4,5\}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 3.5 === &lt;br /&gt;
Representar las funciones &amp;lt;math&amp;gt;T_3&amp;lt;/math&amp;gt;, &amp;lt;math&amp;gt;T_4&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;T_5&amp;lt;/math&amp;gt; en la misma gráfica.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=690</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=690"/>
		<updated>2011-04-05T13:23:13Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) fpprec : 149;&lt;br /&gt;
 (%o1) 149&lt;br /&gt;
 (%i2) bfloat(1000*%pi);&lt;br /&gt;
 (%02) 3.1415926535897932384626433832[92digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%11) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
 (%i2) solve(p);&lt;br /&gt;
 (%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%o3) factor(p);&lt;br /&gt;
 (x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La parte real sería:&lt;br /&gt;
(%i1) realpart(z);&lt;br /&gt;
&lt;br /&gt;
La parte imaginaria sería:&lt;br /&gt;
(%i2) imagpart(z);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
El módulo sería:&lt;br /&gt;
(%i1) abs(Z);&lt;br /&gt;
&lt;br /&gt;
El argumento sería:&lt;br /&gt;
(%i2) carg(z);&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La representación sería : &lt;br /&gt;
(%i1) plot2d([sin(x)-1+x^4],[x,-100,100],[y,-10,10]);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) solve(sin(x)-1+x^4=0);&lt;br /&gt;
&lt;br /&gt;
Las soluciones obtenidas son:&lt;br /&gt;
[x=%i*(1-sin(x))^(1/4),x=-(1-sin(x))^(1/4),x=-%i*(1-sin(x))^(1/4),x=(1-sin(x))^(1/4)]&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
Esto se resuelve de la siguiente manera:&lt;br /&gt;
(%i1) a1:x+a*y+a^2*z=0;&lt;br /&gt;
(%i2) a2:x+b*y+b^2*z=0;&lt;br /&gt;
(%i3) a3:x+c*y+c^2*z=1;&lt;br /&gt;
(%i4) linsolve([a1,a2,a3], [x,y,z]);&lt;br /&gt;
&lt;br /&gt;
Y obtenemos las soluciones siguientes:&lt;br /&gt;
(%i5)  a^2*z+a*y+x=0&lt;br /&gt;
(%i6) b^2*z+b*y+x=0&lt;br /&gt;
(%i7) c^2*z+c*y+x=1&lt;br /&gt;
(%i8) [x=(a*b)/(c^2-b*c+a*(b-c)),y=-(b+a)/(c^2-b*c+a*(b-c)),z=1/(c^2-b*c+a*(b-c))]&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=689</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=689"/>
		<updated>2011-04-05T13:22:34Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) fpprec : 149;&lt;br /&gt;
 (%o1) 149&lt;br /&gt;
 (%i2) bfloat(1000*%pi);&lt;br /&gt;
 (%02) 3.1415926535897932384626433832[92digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%11) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
 (%i2) solve(p);&lt;br /&gt;
 (%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
 (%o3) factor(p);&lt;br /&gt;
 (x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La parte real sería:&lt;br /&gt;
(%i1) realpart(z);&lt;br /&gt;
&lt;br /&gt;
La parte imaginaria sería:&lt;br /&gt;
(%i2) imagpart(z);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
El módulo sería:&lt;br /&gt;
(%i1) abs(Z);&lt;br /&gt;
&lt;br /&gt;
El argumento sería:&lt;br /&gt;
(%i2) carg(z);&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La representación sería : &lt;br /&gt;
(%i1) plot2d([sin(x)-1+x^4],[x,-100,100],[y,-10,10]);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) solve(sin(x)-1+x^4=0);&lt;br /&gt;
&lt;br /&gt;
Las soluciones obtenidas son:&lt;br /&gt;
[x=%i*(1-sin(x))^(1/4),x=-(1-sin(x))^(1/4),x=-%i*(1-sin(x))^(1/4),x=(1-sin(x))^(1/4)]&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
Esto se resuelve de la siguiente manera:&lt;br /&gt;
(%i1) a1:x+a*y+a^2*z=0;&lt;br /&gt;
(%i2) a2:x+b*y+b^2*z=0;&lt;br /&gt;
(%i3) a3:x+c*y+c^2*z=1;&lt;br /&gt;
(%i4) linsolve([a1,a2,a3], [x,y,z]);&lt;br /&gt;
&lt;br /&gt;
Y obtenemos las soluciones siguientes:&lt;br /&gt;
(%i5)  a^2*z+a*y+x=0&lt;br /&gt;
(%i6) b^2*z+b*y+x=0&lt;br /&gt;
(%i7) c^2*z+c*y+x=1&lt;br /&gt;
(%i8) [x=(a*b)/(c^2-b*c+a*(b-c)),y=-(b+a)/(c^2-b*c+a*(b-c)),z=1/(c^2-b*c+a*(b-c))]&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Usuario:Macaglez&amp;diff=684</id>
		<title>Usuario:Macaglez</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Usuario:Macaglez&amp;diff=684"/>
		<updated>2011-04-05T13:12:24Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: Página creada con &amp;#039;Macarena González Lobo&amp;#039;&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Macarena González Lobo&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Alumnos&amp;diff=681</id>
		<title>Alumnos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Alumnos&amp;diff=681"/>
		<updated>2011-04-05T13:10:07Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{| class=&amp;quot;wikitable&amp;quot; border=&amp;quot;1&amp;quot;&lt;br /&gt;
! Nombre&lt;br /&gt;
! Usuario&lt;br /&gt;
|-&lt;br /&gt;
| Álvarez Valles, Daniel             ||          &lt;br /&gt;
|-&lt;br /&gt;
| Bravo García, Monserrat            || Monbragar         &lt;br /&gt;
|-&lt;br /&gt;
| Braza Valle, Elisabet              ||          &lt;br /&gt;
|-&lt;br /&gt;
| Caro Martín, Carmen Rocío          ||          &lt;br /&gt;
|-&lt;br /&gt;
| Charneco Fernández, Juan           ||          &lt;br /&gt;
|-&lt;br /&gt;
| Durán González, María José         ||          &lt;br /&gt;
|-&lt;br /&gt;
| Escalante Macías, Javier           ||         &lt;br /&gt;
|-&lt;br /&gt;
| Escudero Domínguez, Ana María      ||  Anaescdom        &lt;br /&gt;
|-&lt;br /&gt;
| Fajardo Galán, José Manuel         ||          &lt;br /&gt;
|-&lt;br /&gt;
| Gallardo Jiménez, Rafael           ||          &lt;br /&gt;
|-&lt;br /&gt;
| Gálvez Fernández, Carmen María     || Cargalfer        &lt;br /&gt;
|-&lt;br /&gt;
| García Donoso, Ignacio             ||          &lt;br /&gt;
|-&lt;br /&gt;
| García Márquez, Máximo             ||          &lt;br /&gt;
|-&lt;br /&gt;
| González Esteban, Pastora Asunción ||          &lt;br /&gt;
|-&lt;br /&gt;
| González Lobo, Macarena            || Macaglez         &lt;br /&gt;
|-&lt;br /&gt;
| Hidalgo Gutiérrez, Sandra          || Sanhidgut         &lt;br /&gt;
|-&lt;br /&gt;
| Izquierdo Laynez, Antonio          ||          &lt;br /&gt;
|-&lt;br /&gt;
| Jiménez Cruz, María Ángeles        || Marjimcru         &lt;br /&gt;
|-&lt;br /&gt;
| Jurado Rodríguez, Juan José        ||          &lt;br /&gt;
|-&lt;br /&gt;
| Maravert Ortega, María del Carmen  ||          &lt;br /&gt;
|-&lt;br /&gt;
| Márquez Bocanegra, Antonio Jesús   ||          &lt;br /&gt;
|-&lt;br /&gt;
| Martín Cubiles, José Carlos        ||          &lt;br /&gt;
|-&lt;br /&gt;
| Martín Cuervo, José Luis           ||          &lt;br /&gt;
|-&lt;br /&gt;
| Ogayar Lechuga, Pablo              ||          &lt;br /&gt;
|-&lt;br /&gt;
| Pendas Fernández, Aida             ||          &lt;br /&gt;
|-&lt;br /&gt;
| Prieto Martín, Alicia              ||          &lt;br /&gt;
|-&lt;br /&gt;
| Regodón Domínguez, Elena           || Eleregdom         &lt;br /&gt;
|-&lt;br /&gt;
| Rodríguez Canseco, Raúl            ||          &lt;br /&gt;
|-&lt;br /&gt;
| Romero Guerrero, Angela María      ||          &lt;br /&gt;
|-&lt;br /&gt;
| Ronchel Ortigado, Ernesto          ||          &lt;br /&gt;
|-&lt;br /&gt;
| Salguero López, Andrés             ||          &lt;br /&gt;
|-&lt;br /&gt;
| Sangalo Delgado, José Javier       ||          &lt;br /&gt;
|-&lt;br /&gt;
| Santana Gil, Elisa                 ||          &lt;br /&gt;
|-&lt;br /&gt;
| Sendín Bernardo, Alba              ||          &lt;br /&gt;
|-&lt;br /&gt;
| Sosa Orta, Cristina                || Crisosort       &lt;br /&gt;
|-&lt;br /&gt;
| Tofe Morejón, Antonio Manuel       ||          &lt;br /&gt;
|-&lt;br /&gt;
| Toscano Barragán, Rocío            ||          &lt;br /&gt;
|-&lt;br /&gt;
| Vallecillo López, Ana Isabel       || Anavallop         &lt;br /&gt;
|}&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=673</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=673"/>
		<updated>2011-04-01T19:47:29Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
(%o3) factor(p);&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=672</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=672"/>
		<updated>2011-04-01T19:46:00Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.1. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
factor(p);&lt;br /&gt;
&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=671</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=671"/>
		<updated>2011-04-01T19:45:12Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.1. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-[(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
factor(p);&lt;br /&gt;
&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=670</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=670"/>
		<updated>2011-04-01T19:40:04Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
factor(p);&lt;br /&gt;
&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=669</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=669"/>
		<updated>2011-04-01T19:38:18Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
factor(p);&lt;br /&gt;
&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=668</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=668"/>
		<updated>2011-04-01T19:35:40Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.1. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=653</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=653"/>
		<updated>2011-03-31T14:40:38Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.1. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=652</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=652"/>
		<updated>2011-03-31T14:27:11Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
Raices Reales &lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=651</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=651"/>
		<updated>2011-03-31T14:25:20Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.1. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
Raices Reales &lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=647</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=647"/>
		<updated>2011-03-31T14:23:00Z</updated>

		<summary type="html">&lt;p&gt;Macaglez: /* Ejercicio 4.1. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
Raices Reales x=1-sqrt(7),x=sqrt(7)+1&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Macaglez</name></author>
		
	</entry>
</feed>