UNIVERSIDAD NACIONAL MAYOR DE SAN MARCOS Universidad del Perú, DECANA DE AMÉRICA FACULTAD DE INGENIERÍA ELECTRÓNICA, ELÉCTRICA Y TELECOMUNICACIONES TELECOMUNICACIONES EAP: INGENIERÍA ELECTRICA
Curso
:
Laboratorio de Métodos Numéricos
Tema
:
Guía 3
Profesor
:
Ing. Villafuerte
Alumna
:
Vidal Buiza Ivan Augusto !"#!#3
2016-1
Ejemplo
GUÍA 3
% prueba01.m ninpu!"#In$rese numer de perids#& '0(pi)100(*+pi+n -e'p"')10&.+sin"*+'& pl!"',-& !i!le"#Amr!i$uamien!#& 'label"#/iemp"se$& -label"#Psiin "m& $rid
Ejemplo ! Creain de una 2unin. % i2ras.m % 3unin 4ue alula para un numer en!er n ( % sumi2 ( 5uma de i2ras del Numer n % numi2 ( Numer de i2ras del Numer n 2un!in 6sumi2,numi27i2ras"n& sumi20 numi20 89ile n:0 di$i!rem"n,10& sumi2sumi2 ; di$i! numi2numi2 ; 1 n<'"n)10& end
Ejemplo 3
Crear una 2unin e'p1 4ue permi!a b!ener la suma de !=rmins de la serie de /a-lr para apr'imar el e'pnenial de un númer real ' dad n en!er(
% e'p1.m 2un!in se'p1"',n& s1 2r i1(n ss;'>i)2a!rial"i& end
Ejemplo 3 "!#
Una varian!e de la serie de /a-lr usand la 2unin e'p( 2un!in 6s,err7e'p*"',n& % e'p*.m s1 2r i1(n ss;'>i)2a!rial"i& end errabs"e'p"'&s&
Ejemplo $
3unines reursivas MA/?A@ permi!e la reain de 2unines 4ue se llamen a si mismas en !iemp de eeuin para rear al$ri!ms p!en!es. % 2a!.m 2un!in 22a!"n& i2 n0 21 elsei2 n1 21 else 2n+2a!"n1& end
Ejemplo % IF
% prueba0*.m ! rand"1& i2 ! B 0. s0 elsei2 ! 0.* s1 else s 1*+"!0.*& end
Ejemplo & S'ITC(
% prueba0F.m pG s8i!9 p ase F disp"#Ele!rnia#& ase G disp"#Ele!ria#& ase disp"#/eleminuaines#& ase H disp"#@iele!rnia#& !9er8ise disp"#3uera de Ran$...#& end
Ejemplo ) FOR
%prueba0G.m 2r J1(100 % n!adr 's4r!"J& % b!iene la raKL de J i2 'B, % si raKL es ma-r a 2prin!2"#' %.*2 , J %Fd n#,',J& % mues!ra en pan!alla ' - J breaJ % sale del laL end %
Ejemplo * '(ILE
% prueba0.m m G
J 0 89ile Jm ' J)10 disp"6', '>*, '>F7& % imprimir una !abla de valres J J;1 end
Ejemplo +
5abiend 4ue las rdenadas ar!esianas de una irun2erenia sn de la 2rma 'r+s"O& , -r+sen"O& rear una 2unin 4ue se llame irun2erenia1.m 4ue dibue una irun2erenia - 4ue !en$a m parme!rs de en!rada el radi - el n$ul. ?a 2unin !iene 4ue !ener m parme!rs de salida !ds ls pares de valres ',- . Para realiLar el pr$rama, 9a- 4ue !ener en uen!a 4ue el radi permanee ns!an!e - l 4ue va ambiand es el n$ul O. 5luin( "irun2erenia1.m& 2un!in 6',-7irun2erenia1"radi, pas& rradi <0 i0 i2 pasBH0, errr"#An$ul mu- $rande#&, end 2r <0(pas(FH0 <*<+*+pi)FH0 ii;1 '"i&r+s"<*& -"i&r+sin"<*& end pl!"',-,##&
Ejemplo
Cn uan!as i2ras si$ni<a!ivas apr'ima 0.FFF a 1)F 5luin( "eempl10.m& El númer 0.FFF inide n 1)F en ds i2ras si$ni<a!ivas, -a 4ue
En ma!lab( 2r n*( i2+10>"n;1& ""1)F&0.FFF&)"1)F& i2 i2 2prin!2"#numer de i2ras %*$#,n& breaJ end end
Ejemplo
Enuen!re la prpa$ain de errres de la si$uien!e 2rmula( Q Aeσ /G n( σ =.H ' 10 , A0.1, e1.0, /H00ST*0S 5luin(
| |∨
ε H =¿ ∆ H ( ⃗ T )∨¿
∂ H ∂T
∆⃗ T ∨¿
A4uK( ∂ H ∂ T
3
=
4 Aeσ T
=
(
)(
)(
−
4 0.1 1.0 5.67 × 10
8
) ( 600 )
3 =
4.90
∆ H ( 600 ) =( 4.90 ) ( 20 ) =97.98
Errr e'a!( −8 H min =(0.1 )( 1.0 )( 5.67 × 10 ) 580
(
−8
H max =(0.1 )( 1.0 )( 5.67 × 10
4
) =641.65 4
) ( 620 ) = 837.82
Pr l !an!(
|
|
|
ε H = ∆ H exact =
H max − H min 2
|
=
837.82
−641.65 2
=98.08
Es!e valr es mu- eran al resul!ad apr'imad. Ejemplo %
Dad el si$uien!e númer e'presad en 2rma! IEEE G de simple preisin( 0 10011011 00000000000000000000000 A 4ue deimal represen!a 5luin( "eempl1.m& s"1.0&+*>"F01*1*&