Examen Unidad 2 Metodos Numericos
NOMBRE: Jose Luis Miguel Angel Ayon Sanchez No. Control:08310445
-------------------------------------------------
Fecha:15-Nov-2012 Especialidad:Ing. Sis. Comp.Grupo:9.
1. Encuentre una raíz (si tiene) de las siguientes funciones:
* f(x) = x3 – 3x + 1
* f(x) = ex-1
* f(x) = (x – 2)4
* f(x) = x sen(1/x) – 0.2 e-x
Con unaprecisión tal que el error de tolerancia máximo sea emax = 0.00001.
Implementen los métodos numéricos de:
a) Bisecciones
b) Newton Raphson
c) Secante
Estos programas o scriptsdeberán mostrar una animación grafica de lo que ocurre con el método conforme se va aproximando a la raíz encontrada.
1) compara los metodos anteriores escribiendo los resultasos obtenidos concada una de las funciones anteriores en cada metodo y tus conclusiones, en un archivo en Word que agregaras tambien a tus archivos .
Estos resultados obtenidos deben destacar:
* Listado delprograma
* Grafica de la funcion
* Cantidad de iteraciones realizadas
* Raíz de la ecuación
* Tabla de comparacion de los métodos (Rapidez, eficiencia, presicion, ventajas y/o desventajasdel método).
2) Compacta tus programas en un archivo .rar o .zip con el nombre de ISCGrupoNoControlExa2.
Bisecciones
3) %Metodo Bisecciones
4) clc
5) f=input('Captura unafuncion:','s');
6) a=input('Intruduce a:');
7) b=input('Intruduce b:');
8) i=0;
9) tabla=[];
10) clf
11) ezplot(f)
12) c=0;
13) gridon,holdon
14) lineaa=plot([a a],[0f(a)],'r:+');
15) lineab=plot([b b],[0 f(b)],'g:+');
16)
17) if f(a)*f(b)<0
18) emax=0.00001;
19) aabs=1;
20) lineac=plot([c c],[0 f((a+b/2))],'m:+');
21) whileaabs>=emax
22) c=(a+b)/2;
23) delete(lineac)
24) lineac=plot([c c],[0 f(c)],'m:+');
25) pause(1)
26) aabs=abs(a-b);
27) i=i+1;
28) tabla=[tabla;ieabs];
29) if...
Regístrate para leer el documento completo.