ZXTape! 22Trigonometria - Seno, coseno, tangente, cotangenteBoalox informaticaSpanishUtility:TZX by Javier Perez. MadriSX & Retro 2006 D.L: None Side Bt3 c%c~-c`Programa: "trigonom 3" Septiembre,1984  GUSTAVO FERNANDEZ JESUS,1984 "9200":ZE:ڰ"5":"5":ZE::װ".5","22":ZE,"12";"PROGRAMA";DO,"12";"TRIGONOM 3";ON;DO,"12";"__________";ZE;"4","10";"CREACION DE":"9800" 0"11","7";"BOALOX";"12","6";"INFORMATICA" )"13","7";"C/ Gral.Franco,98-ORENSE-" lb$(DI,"28"):m$(DI,"28"):c$(DI,"15"):"1040":n=ONDI:b$(n):n:n=ONDI:m$(n):n:n=ONDI:c$(n):n Nװ".5","25":"20",ZE;"PARA SEGUIR, APRIETA CUALQUIER";"21","13";"TECLA" ="""12" ""st @SI:ON:ZE:ZE:ڰ"4"::"9E3":br=ON:r=ON:s=ON:t="28":u=DI:ink=DO:pap=SE:pa2=pap:fl=ZE:"9100":r="15":s=ON:t="28":u="3":"9100":"3",DO;SE;ON;"Hola,yo me llamo ZX-Spectrum";4,3;"Desde ahora seremos amigos";6,4;"Escribeme tu nombre";7,4;"y pulsa ""ENTER""." G"9E3":n$="":"23658","8":n=ON̰"25":"17",n+ON;SE;ON;ON;" " ZE:i$=:i$="13""#" i$=" ""30" #i$<"A"i$>"z"װ".5",".1":"22" Lװ".1","$":"17",n+ON;ZE;SE;ON;i$:n$=n$+i$:i$=" ""23658","8":n "23658",ZE:n #,n="("̯"#"-on:װ".1",n:n:n=on̯"d":n: (on:"5":si:ze::on,on;"1 - INTRODUCCION"''" 2 - TEST DE CONCEPTOS"''" 3 - LA TANGENTE DE UN ANGULO"''" 4 - PRIMEROS EJERCICIOS SOBRE LA TANGENTE"'" 5 - PROBLEMAS NUMERICOS SOBRE LA TANGENTE"'" 6 - REPRESENTACION GRAFICA DE LA TANGENTE"'" 7 - EJERCICIOS GRAFICOS SOBRE LA TANGENTE"'" 8 - CALCULADOR DE TANGENTES"''" 9 - VOLVER AL COMIENZO" -e"9e3":#0;" > ";do;sI;"Decision:";ڰ"5";" ";1;on;""+°"8";on;"":װ".3","$" .;װ".3",".1":"23658","8":ze:i$=:I$<"1"I$>"9""." /X"":#0;" > ";do;sI;"Decision:";ڰ"5";" ";on;i$:װ".3","$":n=on̰"30":n 0I$="8""1500" 1I$="9""15" 2I$<"3"i$*"100" 3(I$+ON)*"100" A"9310":"9300": dSE:ZE:ON::"9E3":ON;,ON;"ESTE PROGRAMA PRETENDE SER CONTINUACION DEL ANTERIOR (trigonom 2),QUE ESTUDIO EL CO- SENO."''" EL PRESENTE PROGRAMA SE DEDICA COMPLETAMENTE AL ESTUDIO DE LA TANGENTE,SIGUIENDO LA MISMA LINEA.PERO ANTES DE EMPEZAR,ES NECESARIO REFORZAR LOS CONOCI- MIENTOS ADQUIRIDOS SOBRE EL COSENO.PARA ELLO TIENES EL CAPITULO 2 (""TEST DE CON- CEPTOS"")." n"9310":"40" 5N=1418:N,16;S$(12 ):N: s"23658","8":SC=ze:si:on:on::ze,ze;se;do;X$;"21",ze;X$:N=on̰"20":se;do;N,ze;"";N,"31";"":N ˖ze,ze;do;do;" ":ze:N=on̰"8":"9E3":ڰ"5";N,ze;s$:N:ze;ڰ"5";"8",ze;L$:N="9"̰"19":"9E3":N,ze;se;S$:N:"20",ze;se;l$:"9E3" )N=on̰"3":"285":.1}L,36$:N ϗX("5"):J=on̰"5":"275":"277"::"278":Y$=P$(AL,on):ڰ"5";ON;DO,ON;P$(AL)(DO);SE;DI,ON;"A-";F$(AL)'" B-";G$(AL)'" C-";H$(AL) _"":#ze;si;on;do;"CUAL DE LAS TRES?";ze;ze;si;" (A,B,C) >";on;on;on;"":װ".3","36" .ze:I$=:I$<"A"I$>"C"װ".3",".1":"210" a"":#ze;si;on;do;"CUAL DE LAS TRES?";ze;ze;si;" (A,B,C) >";I$:װ".3","36":N=on̰"20":N uI$=Y$N=ondo:"285":װ".1","36":N::AL=(*di)+on:"":#ze;on;B$(AL):M1:N=on̰"30":N:SC=SC+do:J:"8E3" P"":#ze;"INCORRECTO. SOLUCION: ";on;on;Y$:M2:N=on̰"240":N:J:"8E3" 'N=dosi:ze;ڰ"5";N,on;s$():N: (N=dḭ"20":ze;se;N,on;s$():N: 4AL=(*"13")+on:N=on̰"5":X(N)ALN:X(J)=AL: "278" >on:ze,on;do;do;" ";ze,"31";se;ze;"":"63E3":ze: oMI=on:MX=si:ze:si:ze:on::"9E3":N=zḛ"8":n,ze;se;on;s$:N:9 ,0;6;1;L$ +"30",SE:"P",ze:ze,"P":"-80","-80" "13",12 ;"";20,3;"A";"20","14";"B";"10","14";"C";"20","5";"";"20","12";"":"20","9";"c";"16","14";"a";"15","8";"b" do;on;"16","14";"a";"20","9";"c":"15","17";" a";"16","17";" tg = ";"17","17";" c":"495" vse;on;on,on;"HE AQUI LA FORMULA DE LA TAN- GENTE DE EN ESTE TRIANGULO RECTANGULO.":9310^$:9300T$ ON;SE;ON,ON;"COMO RECORDARAS,LA TANGENTE DE UN ANGULO EN EL TRIANGULO REC- TANGULO ES IGUAL A LA RELACION ENTRE SU CATETO OPUESTO Y SU CONTIGUO.":"A" fse;on;on,on;"PUES BIEN,AHORA VAMOS A DESPE- JAR LAS POSIBLES VARIANTES.":9310^$:9300T$ "20","9";"c";se;on;on,on;"DESPEJEMOS EL LADO a:"''11 ;"a"'2;" tg = "'11 ;"c":9310^$:1,1;6;s$(3) se;on;on,on;"c DIVIDE,ENTONCES PASA MULTI- PLICANDO:";4,17;"a= ctg ":180:16,17;"a= ctg ":495:9310^$:9300T$ on,on;se;on;"EFECTIVAMENTE,EL LADO a PUE- DE SER HALLADO,CONOCIENDO LA TANGENTE DE Y EL LADO c.":9310^$:9300T$ "16","14";"a";on;"20","9";"c";ze;se;on;on,on;"DESPEJEMOS EL LADO c:"''11 ;"a"'2;" tg = "'11 ;"c":9310^$:1,1;6;s$(3) se;on;on,on;"Y HE AQUI LA FORMULA DE c:";"4","17";"c= ";3,23;"a";5,21;" tg ":180:15,23;"a";16,17;"c= ";17,21;" tg ":495:9310^$:9300T$ se;on;on,on;"COMO HABRAS OBSERVADO, TODAS ESTAS FORMULAS SON MUY PARECI- DAS A LAS DEL COSENO EN LOS MISMOS CASOS,POR ESTO TE RE- SULTARA FACIL ASIMILARLAS.":"A" 0;6;1;1,1;"TE HABLARE DE LA REPRESENTA- CION GRAFICA DE LA TANGENTE Y DE SUS POSIBLES VALORES EN EL SEXTO CAPITULO DEL PROGRAMA. AHORA PRACTICA LAS FORMULAS APRENDIDAS HACIENDO LOS EJER- CICIOS (CAP. 4 Y 5).":9310^$:40( PN=1418:4;7;N,16;1;S$(12 ):N: ""580":on:si:ze:ze::"9E3" 6N="17"̰"21":SE;ON;N,ZE;S$:N:"16",ZE;ON;L$ ?"s","2":ze,"120":DI,"60":"200",ZE:DI,"158":"",ze &di,"i":"",ze:di,"_":"","N" 8"60","50":"123","123":"172","48":"-56","56" SE;ON;"8","8";"a";"4","14";"b";"4",DI;"c";5,17;"d";2,17;"e";14,11 ;"f";12 ,14;"g";11 ,10 ;"h";14,16;"i";11 ,18;"j" X("13"):SC=ZE:"23658",ZE J=ON̰"5":ch=ZE:""  :"278":AL>"8""525" 7"590+AL":W$:SI;ON;DO;W$(DO),W$(̰"4");"" SE;"18","17";" ";"20","17";" ";"19","8";" tg = ":ON;SE;ٰ"4";"18","17";" ":ZE:i$=:i$<"a"i$>"j"װ".3",".1":"530" )v$=i$:SE;"18","17";v$:װ".3","36" N"20","17";ON;SE;ٰ"4";" ":ZE:i$=:i$<"a"i$>"j"װ".3",".1":"532" )q$=i$:SE;"20","17";q$:װ".3","36" v$=w$("5")q$=w$(SE)"550" ch=ch+ON:ch="545" |ale=(*DI)+ON:"":#ZE;m$(ale):M2:n=ON̰"50":n:"":#0;ON;ON;" PRUEBA DE NUEVO ":"20","17";" ":"530" !"":#ZE;ON;ze;" OBSERVA LA SOLUCION":ON;SI;"18","17";w$("5");"20","17";w$(SE):n=ON̰"160":n:SE;DO;w$(DO),w$(̰"4");"":j:"8e3" &ale=(*DI)+ON:"":#ZE;b$(ale):M1:n=ON̰"100":n:sc=sc+(DOch=ZE)+(ONch=ON)+(".5"ch=DO):w$(ONDO),w$(̰"4");SE;DO;"":j:"8e3" DZE:SE:ZE:ZE::"9E3":SE,ON;"Quieres instrucciones,";SI,ON;n$;"9",DO;"1 - SI";"11",DO;"2 - NO";"15",ZE;ON;l$;"18","5";DO;ON;SI;"Decision:";SE;ZE;ZE;" >";ON;" " G.װ".3",".1":ZE:i$=:i$<"1"i$>"2""583" I7"18","16";i$:װ".3","36":n=ON̰"20":n:i$="2" KON::"9e3":"5",ON;ON;"EN LA PANTALLA APARECERAN LINEAS QUE SE CORTAN UNAS A OTRAS,DE TAL MANERA QUE FORMAN VARIOS TRIANGULOS RECTANGULOS.EL EJERCICIO CON- SISTE EN ESCRIBIR LA FORMULA DE LA TANGENTE DEL ANGULO QUE DESTELLEE EN LA PANTALLA." Lon;"18",ze;L$:"9310": O "0706ba" P "0313ab" Q "0219be" R "0615eb" S "1013fg" T "1310gf" U "1318gi" V "1015ig" Xg"770":1:"23658","8":ze:si::"9E3":N=zḛ"3":N,ze;on;se;S$:N:"4",ze;se;on;L$ [oON,on;se;on;"1:tg x=CATETO OPU/CATETO CON"'" 2:CATETO CON=CATETO OPU/tg x"'" 3:CATETO OPU=tg xCATETO CON" ]-"30",se:"80",ze:ze,"80":"-80","-80" b"13","12";"";"20","3";"A";"20","14";"B";di,"14";"C";"20","5";"":"20","9";"c";"16","14";"a";"15","8";"b" eUN="5"̰"8":N,ze;ڰ"5";on;S$:N:8,ze;ڰ"5";on;L$;se,;"SOLUCION:" gSC=ze:J=on̰"5":SE,"13";5;" ";1,1;6;"1";2,1;"2";3,1;"3":"":5;7,1;S$(3):N=12 16:N,18;" ":N:CH=0:10 ,18;6;"DATOS";7;":" hE:A2=(*DO)+ON:D$=""+("ac"a2=ON)+("ca"a2=DO):A2=OND$="ac" i :A1=(*)+on:A1=do"630" lA1="3""640" na3=(*20)+on:a4=a3+(*5)+1:12 ,18;d$(3);"= ";a4;14,18;d$(2);"= ";A3;16,18;"tg ";d$(1);"= ?":sol=a3/a4:650 va3="(*20)+1":a4=:W$=A4:A4=W$(4):12 ,18;d$(2);"= ";a3;14,18;"tg ";d$(1);"= ";A4;16,18;d$(3);"= ?":sol=a3/a4:650 a3=(*20)+1:a4=:W$=A4:A4=W$(4):12 ,18;"tg ";d$(1);"= ";a4;14,18;d$(3);"= ";a3;16,18;d$(2);"= ?":sol=a3*a4 o"":#ze;on;se;on;" C-CALCULADOR A-AYUDA ":װ".3",".1":ZE:I$=:(I$"A"I$"C"I$"E")"650" I$="C""":"680" A1,ON;ON;ON;" ":"650" 9SOL=K$ڰ"5";SI,ON;S$();SI,;K$:"20":"675" CH=CH+on:CH="3""663" S"7",on;ڰ"5";S$();"7",on;"INCORRECTO. PRUEBA DE NUEVO.":M2:650 "25":SI,on;ڰ"5";S$();SE,"13";ON;SOL:"":#ZE;1;"OBSERVA EL RESULTADO:":A1,ON;ON;ON;" ":"780":J:"8E3" aAL=(*di)+on:"":#ZE;B$(AL):M1:"780":SC=SC+(DOCH=ZE)+(ONCH=ON)+(".5"CH=DO):J:"8E3" 1OP=ze:K$="":TC=ze:CM=ze:"":#ze;on;on;" " #ze:I$=:I$="13"K$"""690" 4(I$="/"I$="*"I$="-"I$="+")OP=zeOP=on:"685" I$="."CM=zeCM=on:"685" $I$<"0"I$>"9"װ".3",".1":"681" TC=TC+on:TC="8""690" :"":K$=K$+I$:#ze;on;K$;on;" ":װ".2","36":681 #N=oṉK$:K$(N)="/"NɱK$"692"  N:"693" $"798":K$(N+1)=ze"680" *K$(ON)<"48"K$(1)"."K$="1"+K$ $K$(K$)<"0"K$(K$)"."K$=K$+"1" N=oṉK$:K$(N)=".""697"  N:"699" N=onK$="0"+K$:"699" N=K$K$(N-ON)<"0""680" "":#ze;on;K$:"660" Lze:si::"9e3":n=zḛ"5":n,ze;on;se;s$:n:"6",ze;6;on;l$ ?769:"90","A":"35","35":ZE,"-34":MI=ON:MX="5" 13 ,13 ;DO;SE;"c";11 ,15;"s":1,1;SE;ON;"EN LOS PRIMEROS DOS PROGRAMAS TE DEMOSTRE QUE EL SENO DEL ANGULO SIEMPRE TRATADO ES LA RECTA s.":"A" qon,on;on;se;"TAMBIEN QUEDO CLARO QUE EL CO- SENO ES LA RECTA c.EN AMBOS CASOS,EL RADIO ES 1.":"A" ĖSE;on;on,on;"SI LA TANGENTE DEL ANGULO ES s ENTRE c, SIENDO s EL SENO, Y c EL COSENO,PODEMOS ESTABLECER UNA FORMULA MUY UTIL:":"A" UON;SE;ON,ON;"LA TANGENTE DE ES IGUAL AL SENO DE ENTRE EL COSENO DE ." `17,25;"sen ";18,18;"tg = ";19,25;"cos ":"A" jON,ON;ON;SE;"HALLEMOS LA TANGENTE DE ALGU- NOS ANGULOS A PARTIR DE LA LA NUEVA FORMULA.":"A" vON,ON;SE;ON;"TANGENTE DE 0:"''10 ;"sen 0 0"'" tg 0= = = 0"'10 ;"cos 0 1":"A" ΀ON,ON;SE;ON;"TANGENTE DE 45:"''10 ;"sen 45 0.7"'" tg 45= = = 1"'10 ;"cos 45 0.7":"A" Іon,on;se;on;"QUE PASARIA CUANDO EL COSENO DE FUERA 0?"'" EL RESULTADO SERIA INFINITO, POR LO QUE QUE ESTABLECEMOS:":"A" ҐON,ON;SE;ON;"LA TANGENTE DE 90 ES INFINI- TA ():"'10 ;"sen 90 1"'" tg 90= = = "'10 ;"cos 90 0":"A" ԞON,ON;SE;ON;"APRENDE ESTO:"'" SIEMPRE QUE EL COSENO DE SEA 0, LA TANGENTE DE SERA INFI- NITA. EL VALOR INFINITO SE RE- PRESENTA ASI: """".":"A" QON,ON;SE;ON;"POR LO QUE LAS TANGENTES DE"'" 90,270,450,... SON .":"A" U"768":"769":"767":DI,"8";"-";DI,"13";"+";"16","8";"+";"16","13";"-" ON;SE;ON,ON;"AQUI TIENES LOS SIGNOS DE Y ENTRE X,Y NATURALMENTE DE LA TANGENTE DE SEGUN EL CUA- DRANTE.":"9310":"9300":SE;ON;ON,ON;"AHORA TE MOSTRARE SUS VALORES REALES SEGUN EL CUADRANTE.":"9310":"9300" SE;ON,ON;ON;"VALORES DE LA TG DE (Y/X): 1.CUADRANTE: 0 a +"'" 2.CUADRANTE: - a 0"'" 3.CUADRANTE: 0 a +"'" 4.CUADRANTE: - a 0":"A":"768" se;on;on,on;"SEGUN ESTO,UN MISMO VALOR"'" CORRESPONDE A VARIOS ANGULOS DIFERENTES.LO VEREMOS EN LA GRAFICA.":"9310":"9300" "30","10":ZE,"90":"60","50":"-55",ZE:"240",ZE:9 ,1;"+";16,2;"0";20,1;"-";SE;ON,ON;ON;"EN EL 1. CUADRANTE,LOS VALO- RES DE LA TANGENTE CRECEN DE 0 A +.": +N="60"80P:N,"50+25*(N/60*)":N "A":SE;ON;ON,ON;"EN EL SEGUNDO CUADRANTE,LA TANGENTE ES NEGATIVA,Y CRECE - A 0:":N="100"̰"120":N,"50+25*(N/60*)":N:"A" ON;SE;ON,ON;"EN EL TERCER CUADRANTE,LA TAN- GENTE ES POSITIVA,YENDO DE 0 A +:":n="120"̰"140":n,"50+25*(N/60*)":n:"A" SE;ON,ON;ON;"EN EL CUARTO CUADRANTE,LA TAN- GENTE ES NEGATIVA. LOS VALO- RES CRECEN DE - A 0:":n="160"̰"180":n,"50+25*(N/60*)":n:"A" ON;SE;ON,ON;"Y ESTA ES LA REPRESENTACION GRAFICA DE LA TANGENTE.HAZ EL EJERCICIO DEL CAPITULO 7":9310^$:40( 0"-100",ZE:"90","A":ZE,"50":ZE,"-100": "n="7"̰"20":n,on;s$():n: ,ذ"90","65","50":"90","65":"50",ZE: ZE:SE:ZE:ZE::"9E3":6,1;"Quieres instrucciones,";7,1;n$;9 ,2;"1 - SI";11 ,2;"2 - NO";15,0;1;l$;18,5;2;1;7;"Decision:";6;0;0;" >";1;" " .װ".3",".1":ZE:i$=:i$<"1"i$>"2""772" 7"18","16";i$:װ".3","36":n=ON̰"20":n:i$="2" Son::"9E3":ON;ON,ON;"EL EJERCICIO CONSISTE EN AVERIGUAR UNA INCOGNITA CONO- CIENDO DOS DATOS DEL TRIANGULO RECTANGULO."'" PARA ELLO DISPONES DE UNA CAL- CULADORA CON LAS CUATRO OPERA- CIONES.ESTA SE ACCIONA PULSAN- DO LA TECLA ""C"""'" SI NECESITAS AYUDA,PULSA ""A"""'" LA FORMULA QUE DEBE SER APLI- CADA DESTELLEARA" ON;" LA CALCULADORA:"'" LOS SIMBOLOS OPERATIVOS SON:"''" /(SHIFT V)=DIVISION,"'" *(SHIFT B)=MULTIPLICACION."''" PARA CALCULAR POR EJEMPLO 12 ENTRE 24,SERA:"'" 12/24"  "9310":  a"20","18";DO;ON;SE;"PULSA ENTER":=""780 :="13""20","18";" ":  (="13""20","18";" ": "780" FM=N+OṈK$:K$(M)="."M=K$((K$(M)<"0"K$(M)>".")MɱK$)680 M:  SI:ZE:ZE:ON::"9E3":"4",ON;ON;"EL EJERCICIO CONSISTE EN IN- TRODUCIR EL NUMERO DE CUA- DRANTE DEL ANGULO DEL VALOR DADO (1,2,3,4),Y SEGUIDAMENTE EL SIGNO DE LA TANGENTE DE DI- CHO VALOR (P=POSITIVO N=NEGA- TIVO 0=CERO)."''" LOS ANGULOS INTERMEDIOS: 90, 180 Y 270,SE CONSIDERAN DE LOS CUADRANTES 2,3 Y 4 RESPECTIVA- MENTE.":"9310"::"9E3":"20","30":ZE,"140":DI,"95":"218",ZE:"18",ZE;ON;L$:N="19"̰"21":ON;SE;N,ZE;S$:N "N=041):N+20,95_+20*(N/100d*):N:N=60<141:N+20,95_+20*(N/100d*):N:N=160200:N+20,95_+20*(N/100d*):N $dN="20"̰"200"Ͱ"50":N,"27":ZE,"140":N:ON;ON,"4";"I";"12";"II";"16";"III";"24";"IV" &SC=ZE:ON;SE;DI,"28";"360";18,"19";"270";DI,"13";"180";ON,"8";"90":ON;1,0;"+";DI,ON;"0";"17",ZE;ON;"-":J=ON̰"5":"":CH=ZE::AG=(*"360")+ON:875k:"19",DI;DO;SE;"VALOR:";"";ON;AG;ZE;"" (a"21",ZE;" CUADRANTE: SIGNO: ";"21","12";1;" ":.3,36$ *<0:W$=:W$>"4"W$<"1".3,.1}L:810* ,h"21","12";ON;W$;ON;"21","28";" ":.3,36$:ZE:I$=:I$"P"I$"N"I$"0"812, .}FR="(AG/180*)":ON;"21","28";I$:((i$="P"FR>ze)(i$="0"FR=ze)(i$="N"FRZE)+("0"FR=ZE)+("N"FR"9"װ".3",".1":"1510" TC=TC+ON:TC>"8""1550" TK$=K$+I$:"4",DO;SE;K$(DO);ON;" ":װ".3","36":I$="-"I$="."I$="0""1510" 4ZE:"1590":"13",L(I$);ON;ON;SE;I$:"1510" 7"1590":"4",DO;SE;K$;"4",DO;" ":ST=ON"1570" oRY=K$/90Z:ST=0(RY=RYRY/2ɺ(RY/2))19,DO;4;"":K$="":1556 *19,DO;4;(K$/180*) Y"285":"9310":N="18"̰"20":N,ON;ڰ"4";S$():N:"4",DO;SE;S$("7"):"1509" "*K=K$:K=K*(180/):K$=K:"1555" 6ZE;"8","7";"calculador TG ":SE;ٺ;"13",ZE;w$;ٰ"4";SI;"12",ZE;L$;SE;ON;"13",ZE;L$:"9e3":K$="0-"K$="0-."K$=K$+"0": 7 @'L(DI):"1090":N=ONDI:L(N):N:SI:SE:ZE:ZE::"9e3":"4",ON;"Quieres instrucciones,";"5",ON;n$;ON;SI,"4";"1 - SI"''"4";"2 - NO":R="12":S=ON:T="28":U=:PAP=SI:PA2=PAP:INK=DO:BR=ON:FL=ON:"91E2":"14","5";ڰ"2";SE;ON;"Decision:";ZE;SI;" >";ٺ;ON;" " E/װ".3","36":ZE:I$=:I$<"1"I$>"2""1605" J i$="2" LiON::"9e3":ON,ON;ON;"PARA CALCULAR LA TANGENTE DEL ANGULO DESEADO,BASTA INTRODU- CIR EL ANGULO Y PULSAR ENTER. PERO ANTES DE ESTO ES IMPRES- CINDIBLE SELECCIONAR LA MEDI- DA DEL ANGULO:GRADOS (DEG) O RADIANES (RAD).PARA ELLO SE PULSARAN LAS TECLAS D O R RESPECTIVAMENTE."'" PARA SALIR DE LA CALCULADORA, PULSAR ""S""" OP.3,.1}L:"15",SI;"PULSA ""ENTER""":0:ɰ"13""1615" Q 8ST=ZE:DI,"17";"RAD";DI,"8";ON;"DEG":"1510" 8ST=ON:DI,"8";"DEG";DI,"17";ON;"RAD":"1510" @ZE:se:on:ze:"4"::"9E3":on,se;on;"CALIFICACIONES:";"3",ze;on;ze;l$;se,do;"CALIFICACION MAXIMA: 10 P."''" CALIFICACION OBTENIDA: ";SC''" PREGUNTAS HECHAS: 5"'''" CALIFICACION: "; ESC=diSC="9.5" FSC=zeSC=".1" JSC=SC+.4L:C$(SC) L*AL=(*di+on):SC>"7""16",on;B$(AL) N0SC<"5""16",on;"TIENES QUE PRACTICAR MAS," PF"9E3":"20",on;N$;"19",on;"PULSA ""ENTER"",":.3,36$ T-ze:13 .3,.1}L:"8020" Y"(" N="#"̯"(":װ".1",N:N: !N="("̰"20"-ON:װ".01",N:N: #(9ze,ze:ze,"":"",ze:ze,-175:-255,ze: #d$="":e$=d$:n=1t:d$=d$+"":e$=e$+"":n:r,s;ink;pap;fl;br;""+d$+"":n=1u:ink;pap;fl;br;r+n,s;"";r+n,s+e$+1;"";r+n,s+1;pa2;pa2;e$:n:r+n,s;ink;pap;fl;br;""+e$+"": #+m2="8105":m1="8100":DI="10":ON=/:ZE=-:DO=ON+ON:SI="7":SE="6":L$="________________________________":X$="":S$=" ":P$("13","85"):F$("13","70"):G$("13","70"):H$("13","70"):"1060":n="a""k"+SI:d:n,d:n #IN=on̰"13":P$(N),F$(N),G$(N),H$(N):N:N="63E3"̰"63022":D:N,D:N: $T:n=mimx:n,on;se;" ":n: $^p"":#ze;19;">Pulsa ";ON;2;6;"ENTER":.2~L,36$:0:13 9310^$ $`"": %""62999"::st=15:1 &H"28","d":ze,-16:29,"d":ze,-16:" ","d":ze,-19:33!,"d":ze,-19:36$,"d":ze,-16:37%,"d":ze,-16:21,91[:11 ,-11 :22,91[:11 ,-11 :21,86V:11 ,-11 :22,86V:11 ,-11 :21,81Q:11 ,-11 :22,81Q:11 ,-11 &`43+,91[:-10 ,-10 :43+,90Z:-10 ,-10 :43+,86V:-10 ,-10 :43+,85U:-10 ,-10 :43+,81Q:-10 ,-10 :43+,80P:-10 ,-10 :44,,80P:0,16:45-,80P:0,17:480,80P:0,20:491,80P:0,20:524,80P:0,17:535,80P:0,16:38&,90Z:10,10 :38&,91[:10 ,10 :38&,95_:10 ,10 :38&,96`:10 ,10 :38&,100d:10 ,10 :38&,101e:10 ,10 &491,111o:11 ,-11 :491,110n:11 ,-11 :491,106j:11 ,-11 :491,105i:11 ,-11 :491,101e:11 ,-11 :491,100d:11 ,-11 : *t4 7S%7Sy9S`Programa: "trigonom 4" Septiembre,1984  GUSTAVO FERNANDEZ JESUS,1984 "9200":ZE:ڰ"5":"5":ZE::װ".5","22":ZE,"12";"PROGRAMA";DO,"12";"TRIGONOM 4";ON;DO,"12";"__________";ZE;"4","10";"CREACION DE":"9800" 0"11","7";"BOALOX";"12","6";"INFORMATICA" )"13","7";"C/ Gral.Franco,98-ORENSE-" lb$(DI,"28"):m$(DI,"28"):c$(DI,"15"):"1040":n=ONDI:b$(n):n:n=ONDI:m$(n):n:n=ONDI:c$(n):n Nװ".5","25":"20",ZE;"PARA SEGUIR, APRIETA CUALQUIER";"21","13";"TECLA" ="""12" ""st @SI:ON:ZE:ZE:ڰ"4"::"9E3":br=ON:r=ON:s=ON:t="28":u=DI:ink=DO:pap=SE:pa2=pap:fl=ZE:"9100":r="15":s=ON:t="28":u="3":"9100":"3",DO;SE;ON;"Hola,yo me llamo ZX-Spectrum";4,3;"Desde ahora seremos amigos";6,4;"Escribeme tu nombre";7,4;"y pulsa ""ENTER""." G"9E3":n$="":"23658","8":n=ON̰"25":"17",n+ON;SE;ON;ON;" " ZE:i$=:i$="13""#" i$=" ""30" #i$<"A"i$>"z"װ".5",".1":"22" Lװ".1","$":"17",n+ON;ZE;SE;ON;i$:n$=n$+i$:i$=" ""23658","8":n "23658",ZE:n #,n="("̯"#"-on:װ".1",n:n:n=on̯"d":n: (qSI:1:5:ZE::"9E3":3,ON;ON;"1 - INTRODUCCION"''" 2 - TEST DE CONCEPTOS"''" 3 - LA COTANGENTE DE UN ANGULO"''" 4 - LA SECANTE DE UN ANGULO"''" 5 - LA COSECANTE DE UN ANGULO"''" 6 - PRACTICANDO LA FORMULAS NUEVAS"'" 7 - TABLA DE TODAS LAS FORMU- LAS TRIGONOMETRICAS DADAS"'" 8 - VOLVER AL COMIENZO" -e"9e3":#0;" > ";do;sI;"Decision:";ڰ"5";" ";1;on;""+°"8";on;"":װ".3","$" .;װ".3",".1":"23658","8":ze:i$=:I$<"1"I$>"9""." /X"":#0;" > ";do;sI;"Decision:";ڰ"5";" ";on;i$:װ".3","$":n=on̰"30":n 0I$="8"15 2 i$*"100" A"9310":"9300": dSE:ZE:ON::"9E3":ON;ON,ON;"ESTE PROGRAMA ES EL CUARTO Y ULTIMO DE LA COLECCION DE PRO- GRAMAS ""trigonom""."''" EN LOS TRES PRIMEROS SE TRA- TARON LAS RAZONES TRIGONOMETRI- CAS BASICAS:EL SENO,EL COSENO Y LA TANGENTE." iON'" AQUI SE ESTUDIARAN LAS RAZONES MENOS IMPORTANTES,QUE NO SON MAS QUE OPERACIONES EN LAS YA DADAS.ESTAS SON: LA COTANGEN- TE,LA SECANTE Y LA COSECANTE." jhON'" COMO ES HABITUAL,HAZ ANTES DE COMENZAR EL TEST DEL CAPITULO II,DONDE REPASARAS LA TANGENTE." n"9310":"40" 5N=1418:N,16;S$(12 ):N: s"23658","8":SC=ze:si:on:on::ze,ze;se;do;X$;"21",ze;X$:N=on̰"20":se;do;N,ze;"";N,"31";"":N ˖ze,ze;do;do;" ":ze:N=on̰"8":"9E3":ڰ"5";N,ze;s$:N:ze;ڰ"5";"8",ze;L$:N="9"̰"19":"9E3":N,ze;se;S$:N:"20",ze;se;l$:"9E3" )N=on̰"3":"285":.1}L,36$:N ϗX("5"):J=on̰"5":"275":"277"::"278":Y$=P$(AL,on):ڰ"5";ON;DO,ON;P$(AL)(DO);SE;DI,ON;"A-";F$(AL)'" B-";G$(AL)'" C-";H$(AL) _"":#ze;si;on;do;"CUAL DE LAS TRES?";ze;ze;si;" (A,B,C) >";on;on;on;"":װ".3","36" .ze:I$=:I$<"A"I$>"C"װ".3",".1":"210" a"":#ze;si;on;do;"CUAL DE LAS TRES?";ze;ze;si;" (A,B,C) >";I$:װ".3","36":N=on̰"20":N uI$=Y$N=ondo:"285":װ".1","36":N::AL=(*di)+on:"":#ze;on;B$(AL):M1:N=on̰"30":N:SC=SC+do:J:"8E3" P"":#ze;"INCORRECTO. SOLUCION: ";on;on;Y$:M2:N=on̰"240":N:J:"8E3" 'N=dosi:ze;ڰ"5";N,on;s$():N: (N=dḭ"20":ze;se;N,on;s$():N: 4AL=(*"13")+on:N=on̰"5":X(N)ALN:X(J)=AL: "278" >on:ze,on;do;do;" ";ze,"31";se;ze;"":"63E3":ze: ,n1:MI=ON:MX=5:SI:ZE::"9E3":N=ZE5:ON;SE;N,ZE;S$:N:6,0;ON;SE;L$ .769:90Z,65A:35#,35#:0,-34":13 ,10 ;"";11 ,12 ;"r";1;SE;ON;11 ,15;"a";13 ,13 ;"c" 0lon;on,on;se;"COMO RECORDARAS,EL SENO DE ES- TE ANGULO ES IGUAL A LA RECTA a (siendo r=1).":"A" 2SE;ON;ON,ON;"EL COSENO SERIA LA RECTA c.":"A":ON,ON;SE;ON;"LA TANGENTE SERIA a ENTRE c,O SEA, EL SENO ENTRE EL COSENO.":"A" 4qSE;ON;ON,ON;"BASANDONOS EN LA TANGENTE, DEFINIREMOS OTRA RAZON TRIGO- NOMETRICA:LA COTANGENTE.":"A" 6ON,ON;SE;ON;"LA COTANGENTE ES IGUAL A LA INVERSA DE LA TANGENTE:"'15;"1"'5;"cotg = "'14;"tg ":"A" 8ON,ON;ON;SE;"TE DEFINIRE LA COTANGENTE DESDE EL PUNTO DE VISTA DE LAS RELACIONES DE LADOS EN EL TRIANGULO RECTANGULO:":"A" :lON,ON;SE;ON;"LA COTANGENTE ES IGUAL AL CA- TETO CONTIGUO ENTRE EL CATETO OPUESTO DEL ANGULO.":"A" mON,ON;SE;ON;"YA QUE LA TANGENTE ES IGUAL AL CATETO OPUESTO ENTRE EL CONTIGUO DEL ANGULO.":"A" @ON,ON;SE;ON;"SI LA TANGENTE ES IGUAL AL SENO ENTRE EL COSENO DEL MIS- MO ANGULO,LA COTANGENTE SERA IGUAL AL COSENO ENTRE EL SENO.":"A" BON,ON;ON;SE;"EFECTIVAMENTE,LA COTANGENTE PUEDE SER HALLADA TENIENDO EL SENO Y EL COSENO DEL ANGULO EN CUESTION,O SIMPLEMENTE LA tg.":"A" DON,ON;ON;SE;"HE AQUI LAS FORMULAS:"''" 1 1 1 cos"'" cotg ===="'" tg a:c sen:cos sen":"A" Fon,on;on;se;"EN EL CAPITULO VI ENCONTRARAS UN EJERCICIO DONDE PODRAS PRACTICAR LAS NUEVAS FORMULAS APRENDIDAS":"9310":"40" ion:MI=ON:MX=5:SI:ZE::"9E3":N=ZE5:ON;SE;N,ZE;S$:N:6,0;ON;SE;L$ 769:90Z,65A:35#,35#:0,-34":13 ,10 ;"";11 ,12 ;"r";SE;ON;11 ,15;"a";13 ,13 ;ON;"c" sSE;ON;ON,ON;"EN ESTE CAPITULO,TRATAREMOS LA SECANTE,BASANDONOS EN TUS CO- CIMIENTOS SOBRE EL COSENO.":"A" ON,ON;SE;ON;"LA SECANTE ES IGUAL A LA INVERSA DEL COSENO:"'15;"1"'5;" sec = "'13 ;"cos ":"A" ON,ON;ON;SE;"TE DEFINIRE LA SECANTE DESDE EL PUNTO DE VISTA DE LAS RELACIONES DE LADOS EN EL TRIANGULO RECTANGULO:":"A" hON,ON;SE;ON;"LA SECANTE ES IGUAL A LA HIPO- TENUSA ENTRE EL CATETO CONTI- GUO DEL ANGULO.":"A" iON,ON;SE;ON;"SI TE DAS CUENTA,LO QUE HEMOS HECHO HA SIDO INVERTIR LA FOR- MULA DEL COSENO:":"A" mON,ON;SE;ON;"YA QUE EL COSENO ES IGUAL AL CATETO CONTIGUO DEL ANGULO ENTRE LA HIPOTENUSA.":"A" wON,ON;ON;SE;"EFECTIVAMENTE,LA SECANTE PUEDE SER HALLADA TENIENDO EL COSENO DEL ANGULO EN CUESTION.":"A" ON,ON;ON;SE;"HE AQUI LAS FORMULAS:"''" 1 1 r"'" sec = = = "'" cos c:r c":"A" on,on;on;se;"EN EL CAPITULO VI ENCONTRARAS UN EJERCICIO DONDE PODRAS PRACTICAR LAS NUEVAS FORMULAS APRENDIDAS":"9310":"40"  ion:MI=ON:MX=5:SI:ZE::"9E3":N=ZE5:ON;SE;N,ZE;S$:N:6,0;ON;SE;L$ 769:90Z,65A:35#,35#:0,-34":13 ,10 ;"";11 ,12 ;"r";SE;ON;ON;11 ,15;"a";ZE;13 ,13 ;"c" sSE;ON;ON,ON;"EN ESTE CAPITULO,TRATAREMOS LA COSECANTE,BASANDONOS EN TUS COCIMIENTOS SOBRE EL SENO.":"A" ON,ON;SE;ON;"LA COSECANTE ES IGUAL A LA INVERSA DEL SENO:"'15;"1"'4;"cosec = "'13 ;"sen ":"A" ON,ON;ON;SE;"TE DEFINIRE LA COSECANTE DESDE EL PUNTO DE VISTA DE LAS RELACIONES DE LADOS EN EL TRIANGULO RECTANGULO:":"A" lON,ON;SE;ON;"LA COSECANTE ES IGUAL A LA HIPOTENUSA ENTRE EL CATETO OPUESTO DEL ANGULO.":"A" gON,ON;SE;ON;"SI TE DAS CUENTA,LO QUE HEMOS HECHO HA SIDO INVERTIR LA FOR- MULA DEL SENO:":"A" mON,ON;SE;ON;"YA QUE EL SENO ES IGUAL AL CATETO OPUESTO DEL ANGULO ENTRE LA HIPOTENUSA.":"A"  uON,ON;ON;SE;"EFECTIVAMENTE,LA COSECANTE PUEDE SER HALLADA TENIENDO EL SENO DEL ANGULO EN CUESTION.":"A"  ON,ON;ON;SE;"HE AQUI LAS FORMULAS:"''" 1 1 r"'" cosec = = = "'" sen a:r a":"A" on,on;on;se;"EN EL CAPITULO VI ENCONTRARAS UN EJERCICIO DONDE PODRAS PRACTICAR LAS NUEVAS FORMULAS APRENDIDAS":"9310":"40" X)SC=ZE:"680":on:si:ze:ze::"9E3" ]6N="17"̰"21":SE;ON;N,ZE;S$:N:"16",ZE;ON;L$ _?"s","2":ze,"120":DI,"60":"200",ZE:DI,"158":"",ze b&di,"i":"",ze:di,"_":"","N" d8"60","50":"123","123":"172","48":"-56","56" gSE;ON;"8","8";"a";"4","14";"b";"4",DI;"c";5,17;"d";2,17;"e";14,11 ;"f";12 ,14;"g";11 ,10 ;"h";14,16;"i";11 ,18;"j" jJ=15:"":AL=(*3)+ON:690+((*8)+1):W$:W$(2),W$(34);1;2;6;"" lSE;18,10 ;"1";19,8;" =";20,9 ;W$(AL*2+3);":";W$(AL*2+4);19,16;1;" ":"":#ZE;2;ON;" T:COTG S:SEC C:COSEC " nC.3,.1}L:0:I$=:I$"T"I$"S"I$"C"622n p RS=0+(3I$="T")+(2I$="S")+(1I$="C"):19,16;SE;""+("cotg "rs=3)+("sec "rs=DO)+("cosec "rs=ON):rs=alsc=sc+do:"":#ze;b$((*DI)+ON):n=35#40(:.1}L,n:n:n=1200:n:690:j:"8e3" r"":#ze;"INCORRECTO. OBSERVA LA SOLUCION:":N=40(20-ON:.01z# =,N:N:N=120:N:SE;19,16;1;""+("cotg "al=3)+("sec "al=do)+("cosec "al=ON):n=1̰"400":n:690:j:"8e3" ZE:SE:ZE:ZE::"9E3":SE,ON;"Quieres instrucciones,";SI,ON;n$;"9",DO;"1 - SI";"11",DO;"2 - NO";"15",ZE;ON;l$;"18","5";DO;ON;SI;"Decision:";SE;ZE;ZE;" >";ON;" " .װ".3",".1":ZE:i$=:i$<"1"i$>"2""683" 7"18","16";i$:װ".3","36":n=ON̰"20":n:i$="2" ON::"9e3":"2",ON;ON;"EN LA PANTALLA APARECERAN LINEAS QUE SE CORTAN UNAS A OTRAS,DE TAL MANERA QUE FORMAN VARIOS TRIANGULOS RECTANGULOS." 2on'" EN LA CASILLA INFERIOR,EL OR- DENADOR TE PRESENTARA UNA FOR- MULA.TU TENDRAS QUE DECIDIR SI ESA FORMULA ES IGUAL A LA CO- TANGENTE,SECANTE O COSECANTE DEL ANGULO QUE DESTELLEA.PARA ELLO PULSARAS O BIEN LA T (CO- TANGENTE), O LA S (SECANTE) O LA C (COTANGENTE).":"9310": mn=1820:SE;n,on;s$(3):n:W$(2),W$(34);2;6;"": "0706bcacba" "0313acbcab" "0219bdedbe" "0615edbdeb" "1013fhghfg" "1310ghfhgf" "1318gjijgi" "1015ijgjig" SI:ZE::9E3(#:3,ON;1;"ESTE CAPITULO ES UNA SECCION DE CONSULTA DONDE ESTAN RECO- PILADAS TODAS LAS FORMULAS ES- TUDIADAS EN LOS CUATRO PROGRA- MAS DE TRIGONOMETRIA."''L$:N=10 21:5;ZE;S$:N:"9310" d6::9E3(#:15,0;1;L$:N=1621:N,ZE;1;SI;S$:N 7,11 ;"cateto opuesto";8,2;"sen = ";9 ,11 ;" hipotenusa";17,ON;SI;ON;"EL SENO DE UN ANGULO ES IGUAL A SU CATETO OPUESTO ENTRE LA HIPOTENUSA.":"9310":MI=ON:MX=14:"9300":750 7,11 ;"coordenada Y";8,2;"sen = ";9 ,11 ;" radio r";17,ON;SI;ON;"EL SENO DE UN ANGULO EN LA CIRCUNFERENCIA ES IGUAL A LA COORDENADA Y ENTRE EL RADIO.":"9310":MI=ON:MX=14:"9300":750 7,11 ;"cateto contiguo";8,2;"cos = ";9 ,11 ;" hipotenusa";17,ON;SI;ON;"EL COSENO DE UN ANGULO ES IGUAL A SU CATETO CONTIGUO EN- TRE LA HIPOTENUSA.":"9310":MI=ON:MX=14:"9300":750 7,11 ;"coordenada X";8,2;"cos = ";9 ,11 ;" radio r";17,ON;SI;ON;"EL COSENO DE UN ANGULO EN LA CIRCUNFERENCIA ES IGUAL A LA COORDENADA X ENTRE EL RADIO.":"9310":MI=ON:MX=14:"9300":750 8,2;"sen (360+ )= sen ";17,ON;SI;ON;"CADA 360 GRADOS SE REPITE EL MISMO ANGULO: EL SENO DE ES IGUAL AL DE 360+ .":"9310":MI=ON:MX=14:"9300":750 8,2;"cos (360+ )= cos ";17,ON;SI;ON;"CADA 360 GRADOS SE REPITE EL MISMO ANGULO: EL COSENO DE ES IGUAL AL COSENO DE 360+ .":"9310":MI=ON:MX=14:"9300":750 7,11 ;"cateto opuesto";8,2;" tg = ";9 ,11 ;"cateto contiguo";17,ON;SI;ON;"LA TANGENTE DE UN ANGULO ES IGUAL A SU CATETO OPUESTO EN- TRE EL CONTIGUO.":"9310":MI=ON:MX=14:"9300":750 7,14;"sen ";8,5;" tg = ";9 ,14;"cos ";17,ON;SI;ON;"LA TANGENTE DEL ANGULO ES IGUAL AL SENO DE ENTRE EL COSENO DE .":"9310":MI=ON:MX=14:"9300":750  7,11 ;"coordenada Y";8,2;" tg = ";9 ,11 ;"coordenada X";17,ON;SI;ON;"LA TANGENTE DE UN ANGULO EN LA CIRCUNFERENCIA ES IGUAL A LA COORDENADA Y ENTRE LA COOR- DENADA X.":"9310":"9300":750 7,15;" 1";8,5;"cotg = ";9 ,15;" tg ";17,ON;SI;ON;"LA COTANGENTE DE UN ANGULO ES IGUAL A LA INVERSA DE LA TAN- GENTE DEL ANGULO.":"9310":MI=ON:MX=14:"9300":750 7,12 ;"cateto contiguo";8,2;"cotg = ";9 ,12 ;"cateto opuesto";17,ON;SI;ON;"LA COTANGENTE DE UN ANGULO ES IGUAL A SU CATETO CONTIGUO EN- TRE EL OPUESTO.":"9310":"9300":750 7,15;"cos ";8,5;"cotg = ";9 ,15;"sen ";17,ON;SI;ON;"LA COTANGENTE DE UN ANGULO ES IGUAL AL COSENO DEL ANGULO ENTRE EL SENO DEL ANGULO.":"9310":MI=ON:MX=14:"9300":750 7,12 ;" hipotenusa";8,2;" sec = ";9 ,12 ;"cateto contiguo";17,ON;SI;ON;"LA SECANTE DE UN ANGULO ES IGUAL A LA HIPOTENUSA ENTRE EL CATETO CONTIGUO.":"9310":MI=ON:MX=14:"9300":750 7,15;" 1";8,5;" sec = ";9 ,15;"cos ";17,ON;SI;ON;"LA SECANTE DE UN ANGULO ES IGUAL A LA INVERSA DEL COSENO DEL ANGULO.":"9310":"9300":750 7,13 ;" hipotenusa";8,2;"cosec = ";9 ,13 ;"cateto opuesto";17,ON;SI;ON;"LA COSECANTE DE UN ANGULO ES IGUAL A LA HIPOTENUSA ENTRE EL CATETO OPUESTO.":"9310":MI=ON:MX=14:"9300":750 7,15;" 1";8,4;"cosec = ";9 ,15;"sen ";17,ON;SI;ON;"LA COSECANTE DE UN ANGULO ES IGUAL A LA INVERSA DEL SENO DEL ANGULO.":"9310":"9300":750  40(  2N=1720:N,ON;SI;S$(3):N: 0"-100",ZE:"90","A":ZE,"50":ZE,"-100": "n="7"̰"20":n,on;s$():n: ,ذ"90","65","50":"90","65":"50",ZE: "Perfecto.Asi se hace","Eso es! Maravilloso","Muy bien! Llegaras lejos","Asi me gusta,muy bien!","Ya lo haces mejor que yo!","Estupendo!,Admirable!","Lo haces bastante bien!","Estoy asombrado.Muy bien!","Excelente!,Buenisimo!","Exacto! Eso es" "Lo siento.Incorrecto","Fijate bien:asi no es","Te has equivocado","Fallaste.Atiende mas","Piensa antes de contestar","Cuidado! Fijate!","Te descuidaste","Trata de hacerlo mejor","No es asi","Esa no es la respuesta" "MUY DEFICIENTE","DEFICIENTE","DEFICIENTE","INSUFICIENTE","SUFICIENTE","BIEN","NOTABLE","NOTABLE","SOBRESALIENTE","SOBRESALIENTE" $ZE,ZE,"113",10001010,10000100,10001010,1110001q,ZE,1100000,1001000H,1110000p,1001000H,1000100D,1111000x,1000000@,1000000@,ZE,1000100D,101000(,101000(,10000,101000(,101000(,10000,ZE,ZE,ZE,11000,11000,ZE,ZE,ZE,"","","","","","","","" &ze,ze,ze,"","",ze,ze,ze,on,1111110~,100010",100010",100010",100010",100010",0,1100000`,10010000,"10010000","1100000",ze,ze,ze,ze '"100000","100000","100000","100000",ze,ze,ze,ze,"101000","101000","101000","101000",ze,ze,ze,ze,ze,ze,"118","137","137","118",ze,ze )h"ALA REPRESENTACION GRAFICA DE LA TANGENTE SE LLAMA:","TANGENTOIDE","COSINUSOIDE","ECUACION LINEAL" *"BLA RELACION ENTRE EL CATETO OPUESTO DE Y EL CONTIGUO DE SE LLAMA:","EL SENO DE ","LA TANGENTE DE ","EL COSENO DE " +q"CEL VALOR MAXIMO POSITIVO QUE PUEDE TOMAR LA TANGENTE DE UN ANGULO ES:"," 3.239871"," 1245"," +" ,<"BLA TANGENTE DE 45 ES:"," 2.235554"," 1"," -0.25" -O"ALA CIRCUNFERENCIA TIENE:"," 2 RADIANES"," 6 RADIANES"," 360 RADIANES" .S"BLA ABREVIATURA UTILIZADA PARA DESIGNAR LA TANGENTE ES:","cos","tg","etc" /d"AEN LA ECUACION: tg = sen :x LA x ES EQUIVALENTE A:"," cos "," sen(123+)"," sen +" 0Z"BLA TANGENTE ES NEGATIVA EN LOS CUADRANTES: "," I Y II"," II Y IV"," I Y IV" 1k"CLA TANGENTE DE UN ANGULO OSCILA ENTRE LOS VALORES:"," -1 Y 1"," -12300 Y 90908"," - Y +" 2L"CEL ANGULO 180 SE EXPRESA EN RADIANES:"," 12.3"," 2.8-"," " 3K"AUN RADIAN EQUIVALE APROXIMADA- MENTE A:"," 57"," 234"," 5989" 4"CSI EL ANGULO AUMENTA EN EL 1. CUADRANTE,","LA TANGENTE DE ESE ANGULO PERMANECE CONSTANTE","LA TANGENTE DEL ANGULO DISMINUYE","LA TANGENTE DE DICHO ANGULO AUMENTA TAMBIEN" 5"CLOS ANGULOS,CUYAS TANGENTES SON POSITIVAS O CERO SON:","DE 90 A 230,Y DE 91 A 99","DE 0 A 180","DE 0 A 90,Y DE 180 A 270" 8se,"31","!",on,"X","+","6","r","#","6","82","35","17","","5","27","122","179"," ","251","16","239","201" B6se,"8",di,"12","14","16","18","20","22","24" @ZE:se:on:ze:"4"::"9E3":on,se;on;"CALIFICACIONES:";"3",ze;on;ze;l$;se,do;"CALIFICACION MAXIMA: 10 P."''" CALIFICACION OBTENIDA: ";SC''" PREGUNTAS HECHAS: 5"'''" CALIFICACION: "; ESC=diSC="9.5" FSC=zeSC=".1" JSC=SC+.4L:C$(SC) L*AL=(*di+on):SC>"7""16",on;B$(AL) N0SC<"5""16",on;"TIENES QUE PRACTICAR MAS," PF"9E3":"20",on;N$;"19",on;"PULSA ""ENTER"",":.3,36$ T-ze:13 .3,.1}L:"8020" Y"(" N="#"̯"(":װ".1",N:N: !N="("̰"20"-ON:װ".01",N:N: #(9ze,ze:ze,"":"",ze:ze,-175:-255,ze: #d$="":e$=d$:n=1t:d$=d$+"":e$=e$+"":n:r,s;ink;pap;fl;br;""+d$+"":n=1u:ink;pap;fl;br;r+n,s;"";r+n,s+e$+1;"";r+n,s+1;pa2;pa2;e$:n:r+n,s;ink;pap;fl;br;""+e$+"": #+m2="8105":m1="8100":DI="10":ON=/:ZE=-:DO=ON+ON:SI="7":SE="6":L$="________________________________":X$="":S$=" ":P$("13","85"):F$("13","70"):G$("13","70"):H$("13","70"):"1060":n="a""k"+SI:d:n,d:n #IN=on̰"13":P$(N),F$(N),G$(N),H$(N):N:N="63E3"̰"63022":D:N,D:N: $T:n=mimx:n,on;se;" ":n: $^p"":#ze;19;">Pulsa ";ON;2;6;"ENTER":.2~L,36$:0:13 9310^$ $`"": %""62999"::st=15:1 &H"28","d":ze,-16:29,"d":ze,-16:" ","d":ze,-19:33!,"d":ze,-19:36$,"d":ze,-16:37%,"d":ze,-16:21,91[:11 ,-11 :22,91[:11 ,-11 :21,86V:11 ,-11 :22,86V:11 ,-11 :21,81Q:11 ,-11 :22,81Q:11 ,-11 &`43+,91[:-10 ,-10 :43+,90Z:-10 ,-10 :43+,86V:-10 ,-10 :43+,85U:-10 ,-10 :43+,81Q:-10 ,-10 :43+,80P:-10 ,-10 :44,,80P:0,16:45-,80P:0,17:480,80P:0,20:491,80P:0,20:524,80P:0,17:535,80P:0,16:38&,90Z:10,10 :38&,91[:10 ,10 :38&,95_:10 ,10 :38&,96`:10 ,10 :38&,100d:10 ,10 :38&,101e:10 ,10 &491,111o:11 ,-11 :491,110n:11 ,-11 :491,106j:11 ,-11 :491,105i:11 ,-11 :491,101e:11 ,-11 :491,100d:11 ,-11 :