ZXTape! 2\MATEMATICAS (Side A)ROSET / INVESTRONICA1983SPANISH EDUCATIVENONE ORIGINAL TAPEmcm '&' A.Cowley Sept.1982 6:6::5 57999:0:7:7::1:10 ,8;"ESPERA POR FAVOR":0:7:"gr""a":0:6:6::"Pt.Esp.":9900& 6:500 ""9 =""12 ="s"600X 1a(17):b(3):c(3):w(5) Pi=14:a(i)=2:a(i+4)=2:a(i+8)=3:i ja(13 )=5:a(14)=5:a(15)=7:a(16)=11 :a(17)=2 !t=0:u=0:v=0  H=0 !&j=(*6)+1:j:1: $Nj=13:i=(*14+3*(j>1))+1:b(j)=a(i):j '4j=12:c(j)=b(1)*b(j+1):j *"c(3)=b(1)*b(1) -Mc(1)=c(2)c(1)=c(3)c(2)=c(3)36$ 3.0,5;" CUAL ES EL MCM DE: -" 41ANS=b(1)*b(1)*b(2)*b(3) 5C2,10 ;c(1);",";c(2);" y ";c(3);" ?" 6i=57 7021,0;"NECESITAS ayuda? Pulsa 'h'" 994,0;"Introduces tus operaciones? s/n" :?i54,0;"Quieres introducir mas? s o n " <""60< >=""62> @="h"78N B="n"96` D58,0;" " E'4,26;" " Fq$:q$="h"78N Ki,0;q$:i:546 NZi=8+4*(H=1)20:i,0;" ":i PH=1111o RH=1:148 `88,0;" Introduce tu respuesta ya " cj4,0;" ";21,0;" " d*a$:a$<480ůa$>579100d e58,0;" " m'8,0;" Tu respuesta: ";a$ na$=ANS121y oF9 +4*(H=1),0;"La respuesta correcta es ";ANS pC.5,-10 :1.5@,-20:t=t-1:v=v+1 q\:"M.C.M de ";c(1);",";c(2);" y ";c(3);"?":"Tu respuesta (erronea) ";a$ r|i=12:b(1)b(i+1)i+10 -2*H,(c(i)<10 );c(i);" = ";b(1);" x ";b(i+1) tib(1)>b(i+1)i+10 -2*H,(c(i)<10 );c(i);" = ";b(i+1);" x ";b(1) u[i:13 -2*H,(c(3)<10 );c(3);" = ";b(1);" x ";b(1) vJ"La respuesta corecta es: ";ANS:::"________________________________" wH=1169 x 146 y+14,1;1;" BIEN HECHO " |u=u+1:t=t+1 e.2~L,2:.2~L,2:.2~L,4:.2~L,4:.5,9 :193 10 ,1;"LUEGO:-" i=12 ib(1)b(i+1)i+10 -2*H,(c(i)<10 );c(i);" = ";b(1);" x ";b(i+1) ib(1)>b(i+1)i+10 -2*H,(c(i)<10 );c(i);" = ";b(i+1);" x ";b(1) i X13 -2*H,(c(3)<10 );c(3);" = ";b(1);" x ";b(1) H=0169 96` ,15,0;" POR LO TANTO:- " )i=24:w(i)=b(i-1):i =w(1)=b(1):j=13:k=13 w(k)w(k+1)184 =w(5)=w(k):w(k)=w(k+1):w(k+1)=w(5) k:j dj=15:16,0;w(1);" x ";w(2);" x ";w(3);" x ";w(4) 20 @j<516,0;" " ^10 :j:"contiene todos los factores,"," dando ";:1:ANS;:0:" como MCM." 121,17;"Pulsa una tecla":0: ¨9 ,1;"Hasta ahora llevas:";:1:10 ,10 ;" ";u;" ";:0:" correctas";11 ,10 ;1;" ";v;" ";:0:" incorrectas" I16,1;"  MAS ?  s o n ":""195 =""196 q$=:700 q$="n"q$="N"200 30 0:7:7: $"" 617,0;"" i=116 #i,0;"";i,31;"":i .2,9 ;" CERTIFICADO " Y5,2;" NOMBRE:  ";n$((n$-((n$>17)*(n$-17)))) X7,2;" FECHA:  ";m$((m$-((m$>17)*(m$-17)))) 49 ,2;" PROGRAMA:  ""MCM""" #11 ,5;"CORRECTAS: ";u %13 ,3;"INCORRECTAS: ";v u+v=0239 ;15,2;"PORCENTAJE: ";(100d*u/(u+v));"%" 2,6;"***";2,22;"***":n=125:l=(*3):ٺ(*6)+1:2,6+l;"*";2,22+l;"*":n:0  620,0;"Para continuar pulsa RUN y ENTER"  fred=58012 0:6000p:n$=z$ n$:  (20,8;" Que dia es hoy ? " 6000p:m$=z$:m$:: 620,0;" Instrucciones? s o n "  0: X:0,13 ;"""MCM""" [12,5;" Minimo Comun Multiplo " ^4,1;"El Minimo Comun Multiplo es el menor numero que es divisible exactamente por cada uno de los dos o mas numeros dados." a)9 ,1;" Por ejemplo:-" d.11 ,1;"60 es el MCM de 4,6 y 10" g 690 j1,1;" EN ORDEN PARA HALLAR  el MCM de dos o mas numeros, debemos primero descomponer los numeros en sus factores primos." mU7,1;" El MCM es el numero que con- tiene todos estos factores" p 690 s5"  POR EJEMPLO:-",," Hallar el MCM de 4,6 y 10" vY3,2;"4 = 2 x 2";5,2;"6 = 2 x 3";7,1;"10 = 2 x 5" y.9 ,1;" Y PODEMOS VER QUE :-" |N11 ,1;"2 x 2 x 3 x 5 contiene todos los factores de 4,6 y 10" :14,1;"dandonos 60 como el MCM de 4,6 y 10" 9 20,1;" Pulsa  ENTER para empezar"  693 + 20,1;" Pulsa  ENTER "  0:: &0:6:6:9 : 40,1;" NO DEJES MORIR A LA ORUGA " A4,4;"5 RESPUESTAS CORRECTAS PUE- DEN SALVARLA" !15,26;"COMIDA" t<0t=0  x=14 z=05.50.5 y=1+z*4  850R z>4.5885u z=tt5875k %y=y-1:z=5.50811+  869e  y=y+1 x+1,y;" "  866b  y=y+1 x+1,y;" "  863_  x,y;" "  y=y+1  860\ w=12  $4:x,y;" ";x+1,y;""  y=y+1  860\ w $4:x+1,y+1;" " "x,y+1;"";:0:"" " 6-t % x,y;" " (z + t=0 .15,31;" " 1 5 4&4:14,25;"" 7.15,23;" ";:0:"" : 502 =?14,25;" " @x=13 :846N C4,4,2,4,2,11 ,2,9 ,2,11 ,3,6,1,7,2,6,6,4 D4,11 ,2,14,4,16,2,14,2,11 ,2,13 ,2,9 ,4,11 E2,16,4,16,2,14,4,11 ,2,9 ,3,11 ,1,9 ,2,7,4,6 F2,2,4,4,2,11 ,4,9 ,2,7,2,6,2,4,2,2,6,4 G 835C H+w=135#:x:y:x/10 ,y:w Ix=12 0-1 J 846N Kx+4,25;" ":x L(100d:7:7:0: M N0:x,26;"":1:x+1,25;"":5:3:x+2,25;"";:0:"";:5:6:"":2:x+3,25;"" Q R!4:x+1,y;""; U0:"" X \4:x+1,y;"" _4:x,y;"" b4:x,y+1;"" e#4:x+1,y+1;"" h k 20 n!0:x+1,y;"" q 502 t7:7:0:: uw=17 x#0:x+1,y+6;"" {#3:x+1,y+6;"" ~w  Wa=58012:"mcm"3:"gr""a",168:"Pt.Esp."::0:5000 pz$="" uy$= z'y$=0ůy$>1646005u y$=13 Ʊz$>0 y$=13 6005u y$=12 6100  z$=z$+y$  62008 0:6005u z$=06035 z$=z$((z$-1))  6030 8z$>18 =?6:20,0;" " B220,(17-((z$+1)/2));z$ G 6035 & 6 &1,0,27,17,82R,228,33!,0,64@,237,176,201,1,0,27,17,0,64@,33!,82R,228,237,176,201 & 9905& &a=124 &b:57999+a,b &a &a=58000 & 4 reNhhZ67Y M67X  tuvh'n<I00y$#HA60Qnlagr X3<~~0x0px>^~/F?8|b?|z8~~<x0<~goooooo~<Pt.Esp. @#idU#1LS@mSsge[@B<@<m > '_V%&L=+`e2JP)J$cz|_JJ JeR'RUJUUURҵiKUUUUUU@JJS3s%IRYTJRRL33O%))TRhg#04% gH-d IIT)H)J*IA_*JJ UR)JUM2UZeU.USRT@M*IHЅQTUTJII3yNIJRTI?Ķ6I@d<ڐC< RfwY@J3$)TRg_|dJUJUURR|%*UUUP*U>>U*jU*UE$?yUJUT%%&g1RR&NF0[ْ@##[L *̔R)U)T풕JUTUTJT*VUPU,JT*VUPU)T좕JUJ*̔T1!b[l$L`1V2@%&sRRTU*U$6yQU*UT*ʦU>>URҪjUUUJRt%JUU2)U)R7}_$JJ fsi@M3$(dڐqC I68t@%)I3II)TU*EIЅIRYTjZeUnUSRT@ YURIRUJ)R*H`_*JJ JITIH3L .dRH`bw % JJRMyff/%%)TK*IRgse)RTUUUUUU)JVUUU@ eR7'SJh)J$1>cJR)&lS`j2RP #OV3(ĒJTdRJJRʩh JRRT%J$)T,ߊwD>} ?`ymGO*l8sg2`n |<*cl00T߀xjQpE3`Rd @<<TOoLl5Tn>Ç xB8h8888h88BJ`)#?"UJ!)8x`0@DTDDT@;oʷҘf̪) lJxx@@DTDx9 );"1 ";3,6+(b(1)>9 )+(b(1)*b(2)>9 );"1 ";3,11 +(b(1)>9 )+(b(1)*b(2)>9 )+(b(2)*b(3)>9 );"1" B1" -";4,1+(b(1)>9 );"-"; E" ";s$(1);" -"; H%b(1)*b(2)>9 "-"; K" ";s$(2);" -"; N$b(2)*b(3)>9 "-" QW5,1;b(1);" ";b(1)*b(2);" ";b(2)*b(3) Tw(1)=(b(2)+1)*b(3)-2*b(3)*(s$(1)="-")+b(1)-2*b(1)*(s$(2)="-") Wn=w(1) Z-w(2)=b(1)*b(2)*b(3) [d=w(2) \ 400 ]i=810 _91:21,2;"NECESITAS ayuda? Pulsa 'h'" `47,0;"Introduces tus operaciones? s/n" a?i87,0;"Quieres introducir mas? s o n " b""98b c=""99c dq$= eq$="h"q$="H"198 fq$="n"q$="N"107k g37,26;" ";11 ,0;o$;o$ hq$:q$="h"q$="H"198 ji,0;q$:i:93] k11 ,0;" INTRODUCE  el numerador ";7,0;o$;18,0;o$;o$;o$;o$ lq$:q$=""108l mq$="h"198 n2q$>4ůq$<480ůq$>579108l oB1:11 ,0;" INTRODUCE  el denominador " p6r$:r$>4ůr$<480ůr$>579112p q.21,0;o$;11 ,0;o$;o$ rr$="h"r$="H"198 s0,62>:100d,0:0,26:-100d,0:11 ,3;"TU";12 ,0;"RESPUESTA" t;11 ,11 -(q$>1)-(q$>2)-(q$>3);q$;12 ,11 ;"-";12 ,11 -(r$>1űq$>1);"-";12 ,11 -2*(r$>2űq$>2);"-";12 ,11 -3*(q$>3űr$>3);"-";13 ,11 -(r$>1)-(r$>2)-(r$>3);r$ v*q$=w(1)r$=w(2)163 |l11 ,13 ;" MALA SUERTE ";12 ,14;"La respuesta";13 ,13 ;" correcta es" 11 ,28+(w(2)>9 )+(w(2)>99c)-(w(1)>9 );w(1);12 ,28;"-";12 ,28+(w(2)>9 );"-";12 ,28+2*(w(2)>99c);"-";13 ,28;w(2) "15,1;" Luego: " 18,0;o$;o$ 16,0+(b(2)*b(3)<10 )+(d>99c);b(2)*b(3);17,4;s$(1);16,6+(b(3)<10 )+(d>99c);b(3);17,9 ;s$(2);16,11 +(b(1)<10 )+(d>99c);b(1) G17,14;"=";16,16+(n<10 )+(d>99c);n 17,0+(d>99c);"--";17,6+(d>99c);"--";17,11 +(d>99c);"--";17,16+(d>99c);"--" S18,0;d;18,6;d;18,11 ;d;18,16;d nw(1)17,20;"=";16,22+(w(1)<10 );w(1);17,23;"-";17,23-(w(2)>9 );"-";18,22+(w(2)<10 );w(2) q$="h"q$="H"172 r$="h"r$="H"172 v=v+1:t=t-1 ).5,-10 :1.5@,-20 :0,1+(b(1)>9 );"1 ";0,6+(b(1)*b(2)>9 );"1 ";0,11 +(b(3)*b(2)>9 );"1" " -";0,1+(b(1)>9 );"- ";0,4;s$(1);" -";0,6+(b(1)*b(2)>9 );"-";0,9 ;s$(2);" -";0,11 +(b(3)*b(2)>9 );"-" n0,1;b(1);0,6;b(1)*b(2);0,11 ;b(2)*b(3): Q"Tu respuesta (erronea) ";0,24-(q$>1)-(q$>2)-(q$>3);q$:0,24;"-";0,24-(r$>1űq$>1);"-";0,24-2*(r$>2űq$>2);"-";0,24-3*(q$>3űr$>3);"-":0,24-(r$>1)-(r$>2)-(r$>3);r$ "Cambia el denominador de cada fraccion por ";b(1)*b(2)*b(3):"La respuesta correta es ";0,16+(w(2)>9 )+(w(2)>99c)-(w(1)>9 w(2)>9 );w(1) 0,16;"-";0,16+(w(1)>9 w(2)>9 );"-";0,16+2*(w(1)>99cw(2)>99c);"-" q0,16+(w(1)>9 w(2)<9 )+(w(1)>99cw(2)<100d);w(2) 3::"________________________________":172 ,16,1;1;" BIEN HECHO !" 18,0;o$;o$ u=u+1:t=t+1 Z.2~L,2:.2~L,2:.2~L,4:.2~L,4:.5,9 :21,16;"Pulsa una tecla":0:0: t7,1;0;"Hasta ahora llevas:";9 ,7;u;" correctas";11 ,7;v;" incorrectas" '15,2;" MAS ? s o n" =""178 q$=:q$"s"q$"n"178 700 q$="s"30 200 11 +7*(H=1),0;"Cambia el denominador de cada fraccion por ";b(1)*b(2)*b(3);" " 21,0;o$ .H=111 ,0;o$;o$:96` :15,0;" ENTONCES:-";21,0;o$ 87,0;o$;18,0;o$;o$:133 H=1H=-1 H=H+1:193 0:7:7: $"" 617,0;"" i=116 #i,0;"";i,31;"":i .2,9 ;" CERTIFICADO " Y5,2;" NOMBRE:  ";n$((n$-((n$>17)*(n$-17)))) X7,2;" FECHA:  ";m$((m$-((m$>17)*(m$-17)))) =9 ,2;" PROGRAMA:  ""Fracciones I""" #11 ,5;"CORRECTAS: ";u %13 ,3;"INCORRECTAS: ";v u+v=0239 ;15,2;"PORCENTAJE: ";(100d*u/(u+v));"%" 2,6;"***";2,22;"***":n=125:l=(*3):ٺ(*6)+1:2,6+l;"*";2,22+l;"*":n:0  620,0;"Para continuar pulsa RUN y ENTER"  9k=12:i=14:j=12 e((w(j)/a(2*i+7-(i=1))))*a(2*i+7-(i=1))-w(j)0415 j Bj=12:w(j)=w(j)/a(2*i+7-(i=1)):j i:k: a=58012 T0:6:20,0;" ":6000p Qz$=""20,5;"Cual es tu nombre ? ":0:6000p:506  n$=z$:n$:  '20,8;"Que dia es hoy ? " $0:6000p:m$=z$:m$:: 620,0;" Instrucciones? s o n "  0: X8:0,1;"""FRACCIONES 1"" (3 pags.) PAG. 1" [I2,8;" Suma y Resta ";3,8;" de Fracciones " ^5,1;"1 1 2" a>" -, - y - son ejemplos de 3 6 5 fracciones." dJ10 ,1;"El numero de arriba de cada fraccion se llama: " g&13 ,10 ;" NUMERADOR " jZ15,1;"Y el numero de abajo se llama:";17,9 ;" DENOMINADOR " m 690 pN0,25;"PAG. 2"," EN ORDEN  para sumar o restar fracciones," sR"debemos primero hallar el M.C.M.(Minimo Comun Multiplo) de los denominadores." v?6,0;"Por ejemplo:-";8,7;"1 1 2" y6" SUMA  - + - + -";10 ,7;"3 6 5" |\12 ,0;"El M.C.M. de 3,6 y 5 es 30","Asi podemos reescribir nuestro ejemplo:-" <15,7;"10 5 12"," SUMA  -- + -- + --" b17,7;"30 30 30";19,10 ;"27",,"Dandonos --";21,10 ;"30" '690:0,25;"PAG. 3" X2,1;" PERO  debemos poner la res- puesta en su forma simplificada" }6,1;" ASI:-";9 ,1;"27";9 ,14;"9",," -- resulta --",," 30";11 ,13 ;"10" 9 20,1;" Pulsa  ENTER para empezar" 0::12 , 21,17;" Pulsa  ENTER "  q$:: &0:7:7:9 : 95:1,8;" DA EN EL BLANCO ":7 13,1;"5 respuestas correctas ganan" x=15 204,75K,x*8 x t<0t=0 x=118 12 ,x;" " x=14+t15:: x 912 ,19;" ";12 ,20;" "  t=0 93:1:10 ,0;"DIANA!!!":0 4,4,2,4,2,4,2,11 ,2,11 ,4,11 ,4,4,2,4,2,4,4,11 ,4,11 4,16,2,14,2,16,2,14,2,11 ,4,7,2,9 ,4,7,2,9 ,8,11 4,16,2,14,2,16,2,14,2,11 ,4,7,2,9 ,4,7,2,9 ,2,11 ,2,7,4,4 "2,4,1,4,1,4,2,4,2,7,2,4,1,4,1,4,2,4,2,7,2,4,1,4,1,4,2,4,2,7,12 ,4,4,7,8,4  736 x=1513 y:z y/10 ,z x  502   Xa=58012:"fr 1"3:"gr""a",168:"Pt.Esp."::0:5000 pz$="" uy$= z'y$=0ůy$>1646005u y$=13 y$=12 6100  z$=z$+y$  62008 0:6005u z$=06035 z$=z$((z$-1))  6030 8z$>18 =?6:20,0;" " B220,(17-((z$+1)/2));z$ G 6035 & 6 &1,0,27,17,82R,228,33!,0,64@,237,176,201,1,0,27,17,0,64@,33!,82R,228,237,176,201 & 9905& &a=124 &b &57999+a,b &a &a=58000 & 4 az gr X8DDDD  HH  ??0033 3300?? 33333333BbRJFBm > '_V%&L=+`e2JP)J$cz|_JJ JeR'RUJUUURҵiKUUUUUU@JJS3s%IRYTJRRL33O%))TRhg#04% gH-d IIT)H)J*IA_*JJ UR)JUM2UZeU.USRT@M*IHЅQTUTJII3yNIJRTI?Ķ6I@d<ڐC< RfwY@J3$)TRg_|dJUJUURR|%*UUUP*U>>U*jU*UE$?yUJUT%%&g1RR&NF0[ْ@##[L *̔R)U)T풕JUTUTJT*VUPU,JT*VUPU)T좕JUJ*̔T1!b[l$L`1V2@%&sRRTU*U$6yQU*UT*ʦU>>URҪjUUUJRt%JUU2)U)R7}_$JJ fsi@M3$(dڐqC I68t@%)I3II)TU*EIЅIRYTjZeUnUSRT@ YURIRUJ)R*H`_*JJ JITIH3L .dRH`bw % JJRMyff/%%)TK*IRgse)RTUUUUUU)JVUUU@ eR7'SJh)J$1>cJR)&lS`j2RP #OV3(ĒJTdRJJRʩh JRRT%J$)T,ߊwD>} ?`ymGO*l8sg2`n |<*cl00T߀xjQpE3`Rd @<<TOoLl5Tn>Ç xB8h8888h88BJ`)#?"UJ!)8x`0@DTDDT@;oʷҘf̪) lJxx@@DTDx9 w(4)>9 );"";" ";s$;" "; Z,w(1)>9 w(2)>9 "" [960:92\:98b \f=w(1):g=w(2) `i=1+(s$=""):w(5)=w(1):x(1)=w(1):w(1)=w(i)*w(3):i=i+(i=1)-(i=2):x(2)=w(2):w(2)=w(i+4*(i=1))*w(4):400 a0x(3)=w(1):x(4)=w(2): bl=810 cn1:7,0;"Introduces tus operaciones? s/n ";21,1;"NECESITAS ayuda ? Pulsa 'h'" d?l87,0;"Quieres introducir mas? s o n " e""101e f=""102f gq$=:q$="n"109m i11 ,0;o$;o$ jq$="h"900 k97,19;" ":q$:q$="h"900 ll,0;q$:l:98b m7,0;o$;21,0;o$;11 ,0;" INTRODUCE  el numerador ";o$:q$:q$>4ůq$<480ůq$>579109m n)q$="h"11 ,0;o$:900 o=1:11 ,0;" INTRODUCE  el denominador" p6r$:r$>4ůr$<480ůr$>579112p q.21,0;o$;11 ,0;o$;o$ r)r$="h"11 ,0;o$:900 s611 ,1;"TU";12 ,0;"RESPUESTA" tq11 ,10 +(q$<2Ʊr$>2)+(q$<2Ʊr$>1)+(q$<3Ʊq$>1Ʊr$>2);q$ u12 ,10 ;"";12 ,10 +(q$>1űr$>1);"";12 ,10 +2*(q$>2űr$>2);"" we13 ,10 +(q$>2Ʊr$<2)+(q$>2Ʊr$<3)+(q$>1Ʊr$<2);r$ x*q$=w(1)r$=w(2)163 |(11 ,13 ;" MALA SUERTE " }D12 ,14;"La respuesta";13 ,13 ;"correcta es" ~>w(2)=112 ,28;w(1):128 11 ,28+(w(1)<10 w(2)>9 )+(w(1)<10 w(2)>99c)+(w(1)<100dw(1)>9 w(2)>99c);w(1);12 ,28;"";12 ,28+(w(2)>9 w(1)>9 );"";12 ,28+2*(w(2)>99c);"";13 ,28+(w(1)>9 w(2)<10 );w(2) q$="h"q$="H"136 Cv=v+1:t=t-1:.5,-10 :1.5@,-20 0,0+(w(4)>9 w(3)<10 );w(3);0,6-(w(4)<10 w(3)<10 )+(g>9 f<10 );f "";0,0+(w(3)>9 w(4)>9 );"";0,3;s$;0,5+(w(3)>9 w(4)>9 );"";0,5+(f>9 g>9 )+(w(3)>9 w(4)>9 );"" 0,0+(w(3)>9 w(4)<10 );w(4);0,6-(w(4)<10 w(3)<10 )+(f>9 g<10 );g P:"Tu respuesta : ";q$;"/";r$:"Respuesta correcta ";w(1);"/";w(2) (:"________________________________": "15,1;" Luego: " 16,0+(w(3)<10 w(4)>9 );w(3);16,5+(x(1)<10 x(2)>9 );x(1) 17,0;"";17,0+(w(4)>9 w(3)>9 );"";17,3;s$;17,5;"";17,5+(x(2)>9 x(1)>9 );"" 18,0+(w(3)>9 w(4)<10 );w(4);18,5+(x(1)>9 x(2)<10 );x(2) 300, 172 ,16,1;1;" BIEN HECHO !" u=u+1:t=t+1 Z.2~L,2:.2~L,2:.2~L,4:.2~L,4:.5,9 21,0;" Pulsa una tecla":0::8,1;0;"Hasta ahora llevas : ";10 ,8;"-";u;" correctas";12 ,8;"-";v;" incorrectas" (15,1;"MAS ? s o n " =""178 q$=:q$"s"q$"n"178 800  q$="n"200 30 0:7:7: $"" 617,0;"" i=116 #i,0;"";i,31;"":i .2,9 ;" CERTIFICADO " Y5,2;" NOMBRE:  ";n$((n$-((n$>17)*(n$-17)))) X7,2;" FECHA:  ";m$((m$-((m$>17)*(m$-17)))) >9 ,2;" PROGRAMA:  ""Fracciones II""" #11 ,5;"CORRECTAS: ";u %13 ,3;"INCORRECTAS: ";v u+v=0239 ;15,2;"PORCENTAJE: ";(100d*u/(u+v));"%" 2,6;"***";2,22;"***":n=125:l=(*3):ٺ(*6)+1:2,6+l;"*";2,22+l;"*":n:0  620,0;"Para continuar pulsa RUN y ENTER"  ,17,8;"=" /s$="x"327G 216,10 +(w(3)<10 w(4)>9 );w(3);16,14+(x(2)<10 x(1)>9 );x(2) 517,10 ;"";17,11 -(w(4)<10 );"";17,12 ;"x";17,14;"";17,15-(x(1)<10 );"" 8=18,10 ;w(4);18,14;x(1) ;17,17;"=" Gn=9 *(s$="") Jw(1)=w(3) M4w(2)=x(2)*(s$="x")+x(1)*(s$="") P 400 SA16,11 +n;w(1);18,15+n;w(2) V4w(1)=x(1)*(s$="x")+x(2)*(s$="") Yw(2)=w(4) \20:400 _A18,11 +n;w(2);16,15+n;w(1) bz17,11 +n;"";17,13 +n;"x";17,15+n;"";17,15+n+(w(1)>9 );"" iv17,18+n;"=";17,20+n;"";17,n+21-(x(4)<10 x(3)<10 );"" k16,n+20+(x(3)<10 x(4)>9 );x(3);18,20+n+(x(3)>9 x(4)<10 );x(4) nq$="h"q$="H"172 q 148 9k=12:i=15:j=12 }((w(j)/a(2*i+7-(i=1)-(i=5))))*a(2*i+7-(i=1)-(i=5))-w(j)0415 j Nj=12:w(j)=w(j)/a(2*i+7-(i=1)-(i=5)):j i:k: a=58012 T0:6:20,0;" ":6000p Qz$=""20,5;"Cual es tu nombre ? ":0:6000p:506  n$=z$:n$:  -20,8;" Que dia es hoy? " $0:6000p:m$=z$:m$:: 620,0;" Instrucciones? s o n "  0: X8:0,1;"""FRACCIONES 2"" (4 pags.) PAG. 1" Y&0,164:255,0 [T2,3;"Multiplicacion y Division ";3,8;" de Fracciones " ^5,4;"1 2" aY6,4;"- y - son ejemplos de";7,4;"6 5 fracciones." dG10 ,0;"El numero de arriba de cada fra-ccion se llama : " g%13 ,8;" NUMERADOR " j[15,0;"Y el numero de abajo se llama :";17,7;" DENOMINADOR " m 690 p\0,25;"PAG. 2";3,0;" EN ORDEN  para multiplicar fra-cciones" sT5,0;"multiplicamos los numeradores para obtener el nuevo numerador" v\9 ,0;"y multiplicamos los denominado- res para obtener el nuevo deno- minador" y13 ,0;" POR EJEMPLO:-";15,1;"2 2 4";16,1;"- x - = --";17,1;"3 5 15" '690:0,25;"PAG. 3" .3,0;"Vamos a ver otro ejemlo:-" L5,1;"6 1";6,1;"- x -";7,1;"7 9" X9 ,0;" ANTES DE MULTIPLICAR  podemos HACER LA OPERACION MAS FACIL:-" k12 ,0;"DIVIDIENDO EL 6 Y EL 9 POR 3";14,0;"Y asi reescribimos el ejemplo como" ^16,1;"2 1 2";17,1;"- x - = --";18,1;"7 3 21" '690:0,25;"PAG. 4" C2,0;"En orden para dividir una fra- ccion por otra" m5,0;"por ejemplo:-";7,1;"1 . 3";8,1;"- - -";9 ,1;"5 . 4" Y11 ,0;"nosotros cambiamos lo de abajo a arriba y entonces multiplica- mos" 814,0;" Asi nuestros ejemplos seran:-" ^16,1;"1 4 4";17,1;"- x - = --";18,1;"5 3 15" ; 20,1;" Pulsa  ENTER para empezar " 0::12 + 21,15;" Pulsa una tecla "  0::  B0:7:7:0::1:"BOLERA":0 #H4,0;"Tumba todos los";6,0;"bolos para ganar" &t<0t=0 )2:x=2 ,y=22262 - 846N /y 2 x=4 8y=23252 : 846N ;y x=206-1 ?)x,24;"";x+1,24;" " @,13 -(x/2-(2*(t=0))) Ax=10 t=0 Bx D2:x=1t E838F+x:x F 502: G04,23;" ";5,22;"": H04,25;" ";5,25;"": I02,26;" ";3,26;"": J02,22;" ";3,21;"": KN1:0:2,22;"STRIKE":0:3,24;" " L1:y=15:x=820:1:x,22;"STRIKE":0:x-1,22;" ":x:y:870f M Nx,y;"";x+1,y;"": Wx=185U Xx Y \x=1502 ]x ^ f t=0 ia1,6,3,9 ,2,6,1,7,3,9 ,2,6 jb1,7,3,9 ,2,6,1,11 ,3,9 ,2,6 k1,6,2,7,1,7,1,4,1,4,1,4,1,7,1,7,1,7 l1,4,1,4,1,4,1,9 ,1,9 ,1,9 ,1,9 ,1,11 ,1,9 ,3,6,2,2 m 873i pi=132 sle:pi vle/7,pi yi | *7,0;o$;21,0;o$ h=1125}  h=1 s$="x"970 v3,11 ;"Invierte la segunda";4,13 ;"fraccion arriba-";5,13 ;"abajo, y multiplica" 90Z:90Z:68D,130:8,0:0,18,:-8,0:3,3:-3,-3:3,-3:68D,130:3,3:-3,-3:3,-3 90Z:99c 3,0+(w(4)>9 w(3)<10 );w(3);3,5-(w(4)<10 w(3)<10 )+(w(2)>9 w(1)<10 );w(1)  5,0+(w(3)>9 w(4)<10 );w(4);5,5-(w(4)<10 w(3)<10 )+(w(1)>9 w(2)<10 );w(2)  ʘ3,13 ;"BORRA PRIMERO. ";4,13 ;"Despues multiplica ";5,13 ;"los dos numeros de";6,13 ;"arriba juntos"  63? >1:950:0:150:300,:950 Λ3,13 ;"Despues,muliplica ";4,13 ;"los dos numeros de ";5,13 ;"abajo juntos ";6,13 ;" " G1:960:0:200:960:92\:99c Xa=58012:"fr 2"3:"gr""a",168:"Pt.Esp."::0:5000 pz$="" uy$= z'y$=0ůy$>1646005u y$=13 y$=12 6100  z$=z$+y$  62008 0:6005u z$=06035 z$=z$((z$-1))  6030 8z$>18 =?6:20,0;" " B220,(17-((z$+1)/2));z$ G 6035 & 6 &1,0,27,17,82R,228,33!,0,64@,237,176,201,1,0,27,17,0,64@,33!,82R,228,237,176,201 & 9905& &a=124 &b &57999+a,b &a &a=58000 & 4 aj gr X <~~<<<<<~~~~~<88||>>????0033 3300?? 33333333~<rPt.Esp. @#idU#1LS@mSsge[@B<@<m > '_V%&L=+`e2JP)J$cz|_JJ JeR'RUJUUURҵiKUUUUUU@JJS3s%IRYTJRRL33O%))TRhg#04% gH-d IIT)H)J*IA_*JJ UR)JUM2UZeU.USRT@M*IHЅQTUTJII3yNIJRTI?Ķ6I@d<ڐC< RfwY@J3$)TRg_|dJUJUURR|%*UUUP*U>>U*jU*UE$?yUJUT%%&g1RR&NF0[ْ@##[L *̔R)U)T풕JUTUTJT*VUPU,JT*VUPU)T좕JUJ*̔T1!b[l$L`1V2@%&sRRTU*U$6yQU*UT*ʦU>>URҪjUUUJRt%JUU2)U)R7}_$JJ fsi@M3$(dڐqC I68t@%)I3II)TU*EIЅIRYTjZeUnUSRT@ YURIRUJ)R*H`_*JJ JITIH3L .dRH`bw % JJRMyff/%%)TK*IRgse)RTUUUUUU)JVUUU@ eR7'SJh)J$1>cJR)&lS`j2RP #OV3(ĒJTdRJJRʩh JRRT%J$)T,ߊwD>} ?`ymGO*l8sg2`n |<*cl00T߀xjQpE3`Rd @<<TOoLl5Tn>Ç xB8h8888h88BJ`)#?"UJ!)8x`0@DTDDT@;oʷҘf̪) lJxx@@DTDx