' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z# u`!, "VERY GOOD !"!6 R6R61)!@ MSMS12!J 510;!T 600D!^ 470_!h DISPLAY WORK RECORDw!r AP$"ATTEMPTED...."!| CR$"CORRECT......"! (12)! (18)! N$;:30:L$! ! L1$! 4:AP$;P1;:22:CR$;R1! NP23190! L2$" 4HE HAVE IN ALLQ 0,MARY HAS,FRECKLES,ROSARIO HAS,HOW MANY MORE DOES MARY HAVE 0,THERE ARE,CHILDREN IN SCHOOL,THE NUMBER OF GIRLS IS,WHAT IS THE NUMBER OF BOYS 14 "NO...THE RIGHT ANSWER IS "C MS2  510  600  470 " 14MANY DID THEY FIND IN ALLf 0,ZERO BLEW UP,BALLOONS,MARSHAL BLEW UP,HOW MANY MORE DID ZERO BLOW UP 1,GREG'S DOG HAS,FLEAS,JOSE'S DOG HAS,HOW MANY FLEAS DO THEY HAVE ALTOGETHER 1,JENNY FOUND,ALUMINUM CANS,THEN ALFREDO GAVE HER,HOW MANY DID S,KING CARLOS HAS,HOW MANY SOLDIERS DO THEY HAVE IN ALL 1,LISA READ,PAGES IN HER BOOK,LINDA READ,HOW MANY DID THEY READ ALTOGETHER? 0,KING KONG IS,FEET TALL,GODZILLA IS,HOW MUCH TALLER IS KING KONG 1,MARTHA FOUND,CLAM SHELLS,SAM FOUND,HOW RIDGE HAS,HOW MANY MORE FIREMEN DOES SF HAVE|x 1,FARMER JONES HAS,COWS,FARMER SMITH HAS,HOWMANY COWS DO THEY HAVE IN ALL 0,JUAN DROVE,MILES IN TWO DAYS,ON THE FIRST DAY HE DROVE,HOW MANY DID HE DRIVE ON THE SECOND6 1,KING FELIPE HAS,SOLDIERS0 < P6P61F QC2850eP 0,THERE WERE,FISH IN A POND,FISHERMEN CAUGHT,HOW MANY FISH ARE LEFTZ 1,JUAN HAS,PENNIES,LOLA HAS,HOW MANY PENNIES IN ALLd 0,TONY HAD,TRADING CARDS,HE GAVE AWAY,HOW MANY DOES HE HAVE NOW,n 0,SF HAS,FIREMEN,MOBJ)1$ I1J:K,K1$,K2$,K3$,K4$:3 K1CABC K1CABQ :D6D61a D6132520v I115:A(I)0: D60 2:1:(15); (18); 4 K1$" "A" "K2$"."  K3$" "B"."  K4$"?"( 11:"ANSWER: ";2 20E RIGHT ANSWER IS "X3Y"2300+MS24 510= 600F 470Y$ "VERY GOOD !"e. R5R51q8 MSMS1zB 510L 600V 470` WORD PROBLEMS (+ AND -)j A((1)470)400t B((1)(A50))25~ J((1)15)1:A(J)12430 A(GIVE THE MISSING NUMBER. ";%R2005\P5P51:14GfQX4Y2340Qp2300]zX", ";kXY", ";{X2Y", ";:" ";", "X4Y11"GIVE THE MISSING NUMBER. ";200P5P51:14QX3Y2340"NO...TH12000R220106X(45(1)):X2X:Y2:2020WX((1)16):X5X:Y5:2020sX((1)6):X10X:Y10R((1)2)2:1:(15)8R12170 X;", ";XY", "; X2Y", ";*X3Y", ";4:" ":>11H"AB1820B$">"!1830,B$"<"<&B$Q$1890c014:"NO...THE RIGHT ANSWER IS "B$l:MS2uD510~N600X470b14:"VERY GOOD !"lMSMS1vR4R41510600470 NUMBER SEQUENCESR(3(1))RMSMS1r510|600#4705 USE < OR >YA((1)5050):B((1)5050)gAB1690x2:1:(15)8:A" ";50,63:" ";:50,255" ";B::"USE < OR > ";3508:A;" ";Q$;" ";B:M1350:MP4P41 )400B((1)180)20/C((1)350)20;DABCL2:1:(15)S8lA" + "B" + "C" = ";u200P3P3111QD1620""NO...THE RIGHT ANSWER IS "D,MS26510@600J470T"VERY GOOD !"^R3R31h200P2P21/Q1000M100H10TO13808(MS2@2:u<"NO...THE RIGHT ANSWER IS ";1000M100H10TO~F510P600Z470dMSMS1n:x"VERY GOOD !"R2R21510600470 217+29+43=A((1)470jO" ONES"tM" THOUSANDS",~T" TENS">H" HUNDREDS"H1270[M" THOUSANDS"iO" ONES"{H" HUNDREDS"T" TENS"1270T" TENS"O" ONES"H" HUNDREDS"M" THOUSANDS":"WHAT IS THE NUMBER? "; "VERY GOOD !" R1R11,MSMS15510>600G470Y PLACE VALUEsO((1)9):O11050$T((1)9):T11060.H((1)9):H110708M((1)7)2BZ((1)3)1L2:(15);(18);V4`Z1130,1180,1230 43*A((1)470500).4B((1)200400)8>CABRH(18);:2:1:(15);hR8:A" - "B" = ";q\200}fP1P11pQC960z9009:(15)11:"NO...THE RIGHT ANSWER IS ";CMS25106004709:(15);LEM TYPESA(15)*L1$"470 - 345"LL2$"PLACE VALUE (THOUSANDS)"dL3$"217 + 29 + 43"yL4$"USE < OR >"L5$"NUMBER SEQUENCES"L6$"WORD PROBLEMS ( + AND - )"L7$"NOTHING"L$"LEVEL 23" NP6470  809 - 41 &SC((TR100TP))2TRTR201:1:(14);>:(18);]DL$;:28:"SCORE...";(SC)cN{X CONTINUE OR QUITbFL1l23:(15);v" PUSH TO CONTINUE";:G$G$"@"ġ:2920FL0  NAMES OF PROBQ$)QL1)9PT840,1100,1500,1710,2030,2520,7100T SELECT PROBLEM TYPEbMS0500uPT((1)6)1PT800,1040,1450,1680,1950,2400,7000 FIGURE & PRINT SCORETPP1P2P3P4P5P6P7TRR1R2R3R4R5R6R7TP0TPRS," @"NOT THE LETTER O!". JTM14000:d T:2:(15):PT840,1100,1500,1710,2030,2520,7100x ^ STRING INPUT h"";Q$ r(Q$)0340 |(Q$)64ġ:2920 QX(0) QL1(Q$) (Q$,QL,1)" "440  460 Q$(Q$,QL,(UR NAME? ";N$& (N$)0ĺ(7):1506 TM1500:A (12)J 680b INPUT SUBROUTINEm "";Q$~ (Q$)0340 QL1(Q$) (Q$,QL,1)"O"300 Q(Q$) (Q$)64ġ:2920 QX(0) " ,: 6"USE ZERO IN NUMBEE COPIED*'  *FOR EDUCATIONAL USE &*E *MAY NOT BE SOLD.COPY-*c ! *RIGHT 1982 CUE,INC * " *********************** d(4);"BRUN LOMEM:":16384 n(4);"BRUN HIGHER TEXT" x7:9 (17)"LEVEL XXIII" (18) 17:"WHAT'S YO * *7  * 333 MAIN STREET *U  * REDWOOD CITY *s  * CA 94063 *  * *  * (415)363-5472 *  * *  ***********************  *PROGRAM MAY B***********) * *G  * SAN MATEO COUNTY *e  * OFFICE OF EDUCATION *  * & *  * COMPUTER-USING *  * EDUCATORS *  * *  * SOFTSWAP * ! LEVEL 23 10-FEB-83. L MATHEMATICS DRILLW b y APPLE II +  BY RICHARD PITCHKA  MODIFIED BY: SHAUN MC EVOY ************             ....1$V,V5H1:H,V5:H2,V5/H,V:N .......................2qH,H2V:H,H2V3:H,H2V5H,V1:H,V4:V1,V2H2: .................3H,H2V:H,H2V5:V,V5H2:H1,V2: .....................4&V,V2000: 6 @TM019) J15(1)16 T0,39TMF ^0,3939TML h] rTM11400:d |0q TM019 0,3919TM 0,3920TM  1000  ....................0 V,V5H:V,V5H2:H1,V:H1,V5: ................********************"5 11)"* *"U 11)"* MATH FACTS *"u 11)"* *" 11)"********************" 11 17)"ADDITION" 15)"SUBTRACTION" 14)"MULTIPLICATION" "17)"DIVISION" ,TM1E COPIED*'  *FOR EDUCATIONAL USE &*E *MAY NOT BE SOLD.COPY-*c ! *RIGHT 1982 CUE,INC * " *********************** dD$(4) n5930 x:: TM1100 (1)151 H40(1):V40(1) H,V : 4 11)" * *7  * 333 MAIN STREET *U  * REDWOOD CITY *s  * CA 94063 *  * *  * (415)363-5472 *  * *  ***********************  *PROGRAM MAY B***********) * *G  * SAN MATEO COUNTY *e  * OFFICE OF EDUCATION *  * & *  * COMPUTER-USING *  * EDUCATORS *  * *  * SOFTSWAP * d) MATH FACTS. 10-FEB-83L MATHEMATICS DRILLW b y APPLE II +  BY RICHARD PITCHKA  MODIFIED BY: SHAUN MC EVOY ************          _BLL12500:LL_L0%_VLL0392_`0,39LL:_jLL@_t`_~ ANSWER BLOCK FOR DIVISIONo_H4,HV8_KPRESS(16384)_KPRESS1283720_16368,0_KPRESSKPRESS128_KPRESS13ī2510`KPRESS8(US$)2US$"":US0:3960:0:4,Y5^ YY9^ Y,Y5X+^ Y,Y2X2<^ Y2,Y5X5K^ X2,X5Y\^ X2,X5Y2m^ X2,X5Y5^ RFLAG1RFLAG0:3580^ AXANSWER^ AX$(AX)^ VY:HX5^LL1(AX$)^Z((AX$,LL,1))^HH8^$580^.LL^8FLAG0 _B0,39LL_LLL_V:_` ANSWER BLOCK FOR DIVISIONI_jH4,HV8^_tKPRESS(16384)s_~KPRESS1283690_16368,0_KPRESSKPRESS128_KPRESS13ī2480_KPRESS8(US$)2US$"":US0:3930:0:H4,HV8:COL:3770)`KPRESS8US$'t%'~ ANSWER BLOCK FOR DIVISION4'H4,HV8I'KPRESS(16384)^'KPRESS1283720l'16368,0'KPRESSKPRESS128'KPRESS13ī2510'KPRESS8(US$)2US$"":US0:3960:0:H4,HV8:COL:3800(KPRESS8US$(US$,(US$)1):396H,H4V21H1,V3$1 H2,V411H2,V571 H1* ERROR TRAPY14(222)77ıc1>11707ıs1>117050:RFLAG1RFLAG0:5720#0D510NAX$(AX)@0XVY:HX10Q0bLL1(AX$)f0lZ((AX$,LL,1))p0vHH5y08300LL0FLAG00LL12500:LL000LL03900,39LL0LL059200V,V5H0V,V2H40H,H4V 129Y/X26,X29Y2+/X26,X29Y5;/Y,Y5X31K/Y,Y2X34\/X31,X34Yo/X31,X34Y2}/X32,Y3/X33,Y4/X34,Y5/YY9/Y,Y5X/Y,Y2X2/Y2,Y5X5/X2,X5Y/&X2,X5Y200X2,X5Y2X2^ Y2,Y5X5%^ X2,X5Y6^ X2,X5Y2G^ X2,X5Y5b^ RFLAG1RFLAG0:3550p^ AXANSWER~^ AX$(AX)^ VY:HX5^ LL1(AX$)^ Z((AX$,LL,1))^ HH8^580^LL^FLAG0^$LL12500:LL^.0^8LL039OBLEMS MUST NOT BE RESET IN OTHER SECTIONS..";(TR200TP.5);"%""$ 24:20*$ G$;$ G$"@"3280D$ 510X$ FL1FL0:470$ PT860,1150,1470,1810,2140,2470,7100$ 470$ RETURN TO MENU$ $ (4)"PR#0"$ (4)"IN#0"$ (4)"RUN HELLO"$ *% D5 AND D6 IN WORD PR;R5#& NP63170#0 L6$7#: 4:AP$;P6;:22:CR$;R6F#D NP73170O#N L7$k#X 4:AP$;P7;:22:CR$;R7#b :"TOTAL PROBLEMS ATTEMPTED..........";TP#l "TOTAL PROBLEMS CORRECT............";TR#v TP0TP1$ :"PERCENTAGE RIGHT.................:30:L$" " L1$3" 4:AP$;P1;:22:CR$;R1B" NP23170K" L2$g" 4:AP$;P2;:22:CR$;R2v" NP33170" L3$" 4:AP$;P3;:22:CR$;R3" NP43170" L4$" 4:AP$;P4;:22:CR$;R4" NP53170" L5$# 4:AP$;P5;:22:CR$ I(1)3:I(2)3:I(3)213# J(1)19:J(2)19:J(3)37N# K(1)2:K(2)18:K(3)18j# L(1)16:L(2)32:L(3)32p# ~# AN1:AD4# LP11299:2,32LP:#& I(1)3#0 J(1)10#: K(1)2#D L(1)32#N #X NO BUZZ#b SCSC10#l #v 24"$ "SCO3314:1,3326!"T I(1)3:I(2)275"^ J(1)13:J(2)37G"h K(1)2:K(2)2["r L(1)32:L(2)32a"| o" AN2:AD3" 1,3314:1,3326" I(1)15:I(2)27" J(1)25:J(2)37" K(1)2:K(2)2" L(1)32:L(2)32" " AN3:AD4" 2,3220:3,3717#FL0:4703$ PT840,1100,1500,1710,2030,2520,7100<$ 470R$ RETURN TO MENUX$ h$ (4)"PR#0"x$ (4)"IN#0"$ (4)"RUN HELLO"$ $ D6 IN WORD PROBLEMS MUST NOT BE RESET IN OTHER SECTIONS#l 4:AP$;P7;:22:CR$;R7K#v :"TOTAL PROBLEMS ATTEMPTED..........";TPx# "TOTAL PROBLEMS CORRECT............";TR# TP0TP1# :"PERCENTAGE RIGHT..................";(TR100TP.5);"%"# 24:20# G$# G$"@"3300# 510 $ FL1 4:AP$;P2;:22:CR$;R2'" NP331900" L3$L" 4:AP$;P3;:22:CR$;R3[" NP43190d" L4$" 4:AP$;P4;:22:CR$;R4" NP53190"& L5$"0 4:AP$;P5;:22:CR$;R5": NP63190"D L6$"N 4:AP$;P6;:22:CR$;R6"X NP73190#b L7$5& X2,X5Y!& X2,X5Y22& X2,X5Y5M& RFLAG1RFLAG0:3580[& AXANSWERi& AX$(AX)w& VY:HX5&LL1(AX$)&Z((AX$,LL,1))&HH8&$590&.LL&8FLAG0&BLL12500:LL&L0&VLL039&`0,39LL&jLL RETURN TO MENU&p +&z (4)"RUN HELLO"1& p& D6 IN WORD PROBLEMS MUST NOT BE RESET IN OTHER SECTIONSx& :& 12:"VERY GOOD "N$". YOUR SCORE WAS "(SC)& (4);"RUN HELLO"L.....";TP6% "TOTAL PROBLEMS CORRECT............";TRE% TP0TP1% :"PERCENTAGE RIGHT..................";(TR210TP.5);"%"% 24:20%* G$%4 G$"@"3430%> 550%H FL1FL0:490%R PT860,1130,1510,1870,2190,2560,3050%\ 490&f 22:CR$;R3$ NP43320"$ L4$>$ 4:AP$;P4;:22:CR$;R4M$ NP53320V$ L5$r$ 4:AP$;P5;:22:CR$;R5$ NP63320$ L6$$ 4:AP$;P6;:22:CR$;R6$ NP73320$ L7$$ 4:AP$;P7;:22:CR$;R7 % :"TOTAL PROBLEMS ATTEMPTED.....0:4700$ PT840,1100,1500,1710,2030,2520,71009$ 470O$ RETURN TO MENUU$ e$ (4)"PR#0"u$ (4)"IN#0"$ (4)"RUN HELLO"$ $ D6 IN WORD PROBLEMS MUST NOT BE RESET IN OTHER SECTIONS,l 4:AP$;P7;:22:CR$;R7H#v :"TOTAL PROBLEMS ATTEMPTED..........";TPu# "TOTAL PROBLEMS CORRECT............";TR# TP0TP1# :"PERCENTAGE RIGHT..................";(TR200TP.5);"%"# 24:20# G$# G$"@"3300# 510$ FL1FL:AP$;P2;:22:CR$;R2$" NP33190-" L3$I" 4:AP$;P3;:22:CR$;R3X" NP43190a" L4$}" 4:AP$;P4;:22:CR$;R4" NP53190"& L5$"0 4:AP$;P5;:22:CR$;R5": NP63190"D L6$"N 4:AP$;P6;:22:CR$;R6"X NP73190"b L7$#24] Y3,Y5X20&] Y3,Y5X224] X19,Y2B] X21,Y2P] X23,Y2`]* Y,Y5X26q]4 X26,X29Y]> X26,X29Y2]H X26,X29Y5]R Y,Y5X31]\ Y,Y2X34]f X31,X34Y]p X31,X34Y2]z X32,Y3] X33,Y4^ X3Y3X2\X Y3,Y5X1)\b Y1,Y3X4:\l Y3,Y5X5G\v X3,Y3V\ Y,Y5X7f\ Y,Y5X11q\ M14\ X6M,YM1\ M\ X13,X16Y\ X13,X16Y2\ X13,X16Y5\ Y,Y2X13\ Y2,Y4X16\ Y,Y1X18] Y,Y1X[ Y1,Y4X6"[ X7,X10Y54[ Y1,Y4X11F[ Y5,Y6X13V[ Y,Y5X20g[ X18,X22Yw[ Y,Y5X24[ Y,Y5X27[ X24,X27Y2[ Y,Y5X29[ X29,X32Y[& X29,X32Y2[0 X29,X32Y5[: YY9[D X3,Y\N Y1,1,V3H10Z H12,V4)Z M1500:M5Z M139HOLDERANSWER:ANSWERFIRST:FIRSTHOLDERUHLOOP((FIRST))11URZ(((FIRST),LOOP,1))U\590UfLOOPUpV1,V5H2:HH3:H5,33V2UzLOOP((SECND))11 VZ(((SECP T550TVV7)T45(4LNG),31V3TVV2VJH8JR ....LEVEL NUMBER>BERSINZ0İ220 IXZ1İ240.IbZ2İ270D ...(BLANK)............. _D0:L05:H,H3VL:L:COLeDD ....................0DV,V5H:V,V5H2:H1,V:H1,V5:D ....................1DV,V5H1:H,V5:H2,V5DH,V:E ......BE COPIED*(C *FOR EDUCATIONAL USE &*FC *MAY NOT BE SOLD.COPY-*dC! *RIGHT 1982 CUE,INC *C" ***********************Cd::16302,0Cn0CxV4047:0,39V:VCM1100CH((1)39):V((1)39):((1)15)1CH,VCMD * *8B * 333 MAIN STREET *VB * REDWOOD CITY *tB * CA 94063 *B * *B * (415)363-5472 *B * *B *********************** C *PROGRAM MAY *************A * *HA * SAN MATEO COUNTY *fA * OFFICE OF EDUCATION *A * & *A * COMPUTER-USING *A * EDUCATORS *A * *A * SOFTSWAP *B&#"@ LEVEL 21 10-FEB-83/@ M@ MATHEMATICS DRILLX@ c@ z@ APPLE II +@ @ BY RICHARD PITCHKA@ @ MODIFIED BY: SHAUN MC EVOY A ***********               """"RE........................";(SC);($ 5$ SCSC10F$ SC1003250L$ T$ :j$ 12:"VERY GOOD."|$ LL1100:LL$ (4);"RUN HELLO"U*U* .""""< <"""<">$ "" &"""  "" ****$$$$"""$$0&< ,""""**"""$>>   *U*U*":*:<"">""$$$$$$$$$$$>$ $>>$ "2"<""">"""8 "  "$>"6*""""""&*2"""""""$$"""*,"" "" ">*"""""""""""""**"""""">"">>> >00000>* @0 66$>>< (&20 *,  **> > "2*&" " >>  ">> "8""> """"""<  >> "LKxHHD+(DA/(Dq'  I)(H  p闠 y) 񗰐 z$ r0θ4KHH0t# p y0p 9G @0ɩL[hHHϸȸI^hHHoTDD>8 p``0 >>>8 p`@@@@`| @`p8|x8888888888x 0`@ xx@`pX @@@@@@| x<p n<p&| x< p88p@8h|LD@@@@@@`<8 p><8 0p``@@o;FFn, , <<   x    <`@@@@@@@@`@8p  Ll|\  < |<<4tddD<<8hhH H   p  pp f66vf x@@` 0x >| x |`88`||| x || x<`8>8`p8 8 p`ppp888 WHEN ANSWER OK";k0NR9ĺ" ";{:HR9ĺ" ";D" ";LN$N1180: GET ANXANABī1910b1560: RIGHT SUBRlvAXAB:4800: NO SUBROUTINEFLAG3:960D$"RUN HELLO", + AND X ROUTINE7I13JJV(I)1ī1740PZ1760nAMA(I):BMB(I)PT(I)2PT(I)4SM3SM:4390M13JV(M)JV(M)1SM1ABABSM2ABAB940: SET UP PROBLEM221:40):ELLO"0:13,14H1:COLR#> ** TOO MUCH TIME **IANABOc RIGHT ROUTINEo"NRNR1{,HRHR16@23:" ";LN$JLL1100T16(1)^0,3940(1)h(1)16r0,3940(1)|LL11<:F1370P1320(Z16368,09dPK(16384)KnCTCT1:COLR^xCTTVġ:1530pPK127ī150013,14H1TM175:PK(16384)PK127ī1500013,14H1TM150:1380PK157Ĺ16368,0:D$"RUN HZPK176:830HH4 Z1Z*1370>PK141ANZ1:sPK136HH4:0:MHH2:11,16M::COLR:1200PK176PK185ī1250 ZPK176:830HH41370(PK141AN10Z1Z:2PK136HH4:0:MHH2:11,16M::COLR:1250~QQQ5Q((235)QQ)QT:QTQT1:Q23QT0:1160Q1940,2020,2090,2240,2320,2400,2590,2690,2730,2830,2930,3000,3070,3140,3260,3330,3370,3440,3510,3580,3660,3820,3890 ** INPUT ANSWER **HH4:CT01370PK176PK185ī1200 ERITUS"'.:1:13:"MATHAMATICIAN ?"/820^B5:"TYPE A NUMBER AND PRESS RETURN: ";Q$gL800qV:22}`Q(Q$)jQ(Q)ĺ"NO DECIMALS PLEASE":LL11500:LL:1000tQ1Q5ĺ"TYPE A NUMBER THAT YOU SEE ABOVE":LL11500:LL:1000:COLR15(1)1:COLR-H9:V11:ZA:830CHH4:SM770,710VHH4:ZB:830eHH4:690k::33,36:32,4"ARE YOU A :":" 1) NOVICE":" 2) FAIR":" 3) INTERMEDIATE":" 4) EXPERT"$:" 5) EM2,V3H1(V,V1H2:V4,V5H2:D  RETURN TO MAIN MENU?U*Q$(29)ıj4(4)"RUN HELLO"x>Z0İ440HZ1İ460RZ2İ490\Z3İ520fZ4İ540pZ5İ560zZ6İ580Z7İ600Z8İ620Z9İ640......=#H,H2V1:H,H2V4:@ .....................+iV,V5H1:V2,V3H:V2,V3H2:y ........-H,H2V3:H,H2V2: ........../H,H2V3:H,H2V2:H1,V:H1,V5: ..........X  V,V1H:V4,V5H:V ......................8KvV,V5H:V,V5H2:H1,V:H1,V2:H1,V5:h .....................9V,V5H2:V,V2H:H1,V:H1,V2: .....................?H,H2V:H1,H2V2:H2,V1:H1,V3:H1,V5 ...............3H:V,V5H2:H1,V3:40 ...................5m:H,H2V:H,H2V2:H,H2V5:H,V1:V3,V4H2:D ....................6NV,V5H:V2,V5H2:H1,H2V:H1,V2:H1,V5:X .....................7bH,H2V:V,V5H2:l 70,380,390,400$ D$"RUN LEVEL 18": D$"RUN LEVEL 19"P D$"RUN LEVEL 20"f "D$"RUN LEVEL 21"| ,D$"RUN LEVEL 22" 6D$"RUN LEVEL 23" @D$"RUN LEVEL 24" JD$"RUN LEVEL 25" TD$"RUN LEVEL 26" ^D$"RUN MATH FACTS"A" 24. LEVEL XXIV", " 25. LEVEL XXV"E " 26. LEVEL XXVI"^ " 27. MATH FACTS"f : "ENTER NUMBER AND PUSH RETURN: ";Q$ Q(Q$) Q(Q)ī20 Q18Q27ī20 QQ17 Q260,270,280,290,300,310,320,330,340,350,360,3 (4)"PR#0"!(4)"IN#0"):5D$(4);(_2"CHOOSE THE PROGRAM YOU WANT:"g<:F" 18. LEVEL XVIII"P" 19. LEVEL XIX"Z" 20. LEVEL XX"d" 21. LEVEL XXI"n" 22. LEVEL XXII"x" 23. LEVEL XXIII"   0UPTIME500TIME0[ LEVEL IS AN ARBITRARY NUMBER TO HELP DETERMINE DIFFICULTYt GET NUMBERS TO USEFIRST(LEVEL(1))1SECND(LEVEL(1))1ANSWER0LNG((FIRST))4SECNDFIRSTLNG((SECND))4  GOTO APPROP8SCRESCRE1BTIME0?LV,V2H:V2,V5H1:V,V2H2oVV,V5H4:H5,H6V:H5,V2:H5,H6V5`H8,H10V:H8,H10V2:H8,H10V5:H8,V1:V3,V4H10jV,V3H12:H12,V5:920:t CONTROL BLOCK~US$""LEVEL100,42:9,47:42,4710C42,4712:13,42:13,45:43,4414:46,4714l42,4716:17,1842:17,44:17,1847V42:H20:480H25LL1((SC)):Z(((SC),LL,1))600:HH8:LLF1AGF1AG1:1140$ ........YES !.FLAG03515:34,35171f19,2326:26,3519:19,2327?p19,2330Mz19,2334[19,2335s26,3119:26,3523M11500:M0:V047:0,39V:V50,242:43,440:1,244:45,472:0,14742,474:5,642:5,64742,478:98,1318:8,1322:14,1519:14,1521:16,1720X8,1724:25,278:25,2612:25,2817o 8,1730:31,341713,2622:13,2623:13,2638:13,2639 24,3713:24,3726*144V2437>14,25VHVR8\26,3516:26,2715:34,XZ0İ230bZ1İ250*lZ2İ2808vZ3İ310FZ4İ330TZ5İ350bZ6İ370pZ7İ390~Z8İ410Z9İ430HH4 ....TITLE PAGE GR88,176:7,10178,1712:13,158:13,1412:13,1617.)V,V5H1:V2,V3H:V2,V3H2:9 ........-UH,H2V3:H,H2V2:g ........../&H,H2V3:H,H2V2:H1,V:H1,V5:0 ..........X:V,V1H:V4,V5H:V2,V3H1DV,V1H2:V4,V5H2:N ....PRINT NUMBERS:H1,V5:( .....................9RV,V5H2:V,V2H:H1,V:H1,V2:o .....................?H,H2V:H1,H2V2:H2,V1:H1,V3:H1,V5 .....................=H,H2V1:H,H2V4: .....................+V:H,H2V2:H,H2V5:H,V1:V3,V4H2:Ir ....................6|V,V5H:V2,V5H2:H1,H2V:H1,V2:H1,V5: .....................7H,H2V:V,V5H2: ......................8 V,V5H:V,V5H2:H1,V:H1,V2.............21 "H,H2V:H,H2V3:H,H2V5R ,H,V1:H,V4:V1,V2H2:k 6 .................3 @H,H2V:H,H2V5:V,V5H2:H1,V2: J .....................4 TV,V3H:V,V5H2:H1,V3: ^ ...................5-hH,H2ŁV047:0,39V:V 720: ...(BLANK)............. [ 0:L05:H,H3VL:L:COLa ~ ....................0 V,V5H:V,V5H2:H1,V:H1,V5: ....................1 V,V5H1:H,V5:H2,V5 H,V:  ..........OPIED*$  *FOR EDUCATIONAL USE &*B *MAY NOT BE SOLD.COPY-*` ! *RIGHT 1982 CUE,INC *~ " *********************** d::16302,0 x0 V4047:0,39V:V M1100 H((1)39):V((1)39):((1)15)1 H,V M 0: *4  * 333 MAIN STREET *R  * REDWOOD CITY *p  * CA 94063 *  * *  * (415)363-5472 *  * *  ***********************  *PROGRAM MAY BE C********& * *D  * SAN MATEO COUNTY *b  * OFFICE OF EDUCATION *  * & *  * COMPUTER-USING *  * EDUCATORS *  * *  * SOFTSWAP *  *"! LEVEL 18 10-FEB-83. L MATHEMATICS DRILLW b y APPLE II +  RICHARD PITCHKA  MODIFIED BY: SHAUN MC EVOY ***************            40: SETUP PROB (18102 E+=TV200FSM2XA(9(1))1jB(9(1))1|AB10ī198016901970 EASY -TV275SM1A(10(1)) B((11A)(1))4320 2050* ER4TV27521,Y2% X23,Y2%%* Y,Y5X266%4 X26,X29YI%> X26,X29Y2\%H X26,X29Y5l%R Y,Y5X31|%\ Y,Y2X34%f X31,X34Y%p X31,X34Y2%z X32,Y3% X33,Y4% X34,Y5% YY9% Y,Y5X% Y,Y2X2& Y2,Y5X $v X3,Y3$ Y,Y5X7+$ Y,Y5X116$ M14G$ X6M,YM1N$ M_$ X13,X16Yr$ X13,X16Y2$ X13,X16Y5$ Y,Y2X13$ Y2,Y4X16$ Y,Y1X18$ Y,Y1X24$ Y3,Y5X20$ Y3,Y5X22$ X19,Y2% X5,Y6X13# Y,Y5X20,# X18,X22Y<# Y,Y5X24L# Y,Y5X27_# X24,X27Y2o# Y,Y5X29# X29,X32Y#& X29,X32Y2#0 X29,X32Y5#: YY9#D X3,Y#N Y1,Y3X2#X Y3,Y5X1#b Y1,Y3X4#l Y3,Y5X50 " 1,39M" M" COL&"" 920,", @"6 THE ANSWER ISG"@ 0S"J M139_"T 1,39Mf"^ Mm"h 9y"r X0:Y0"| Y,Y5X" M14" XM,YM" M" Y,Y5X4" X7,X10Y" Y1,Y4X6" X7,X10Y5" Y1,Y4X11 # YFLAG2ī2870!d FLAGFLAG1=!n SCRESCRE1:SCRE0SCRE0P!x 8:VV1:HH1]! V,V4Hh! M14w! HM,HM1~! M! V,V4H4! V1,V3H6! H7,H9V! H7,H9V4! V1,V3H10! H12,V4! M1500:M! M139" ME2510 2290$ CHECK ANSWER0 V2:H2> US(US$)a USANSWERV2:H2:1060:2560k 2630r 0 LL11500:LL  LL140:1,39LL:LL  US$"" ( COL 2 USANSWER1140 < BLOCK1340,1570,1810,2050 F NO! P TIME0 !Z 00:0:H,H3V8:COL<B KPRESS21HENPTHH4:200:2290PL KPRESS212290nV KPRESS48KPRESS572290}` H82290j H362290t 0~ H,H4V8 COL Z((KPRESS)) 600 US$(KPRESS)US$ TIMERTIMER1 TIMERUPTI3HH3HH18:ENPTH$37106TIMERTIMER1MTIMERUPTIME2510W1520]o USER ANSWER~H,H4V8 KPRESS(16384) KPRESS1282480 16368,0$ KPRESSKPRESS128. KPRESS13ī25108 KPRESS21US$(US$,2):2D->HOLDERANSWER:ANSWERFIRST:FIRSTHOLDERHHLOOP((FIRST))11dRZ(((FIRST),LOOP,1))m\600wfLOOPpV1,V5H2:HH3:H5,33V2zLOOP((SECND))11Z(((SECND),LOOP,1))600LOOPVV12((FIRST))G),31VVV2H28$22906TIMERTIMER1MTIMERUPTIME2510W1520]s DIVISION BLOCK~ US$""FIRST(FIRST10):SECND(SECND10):FIRST101SECND1012070 FIRST0SECND01140*V22:H244ANSWERFIRSTSECNT(FIRST10):SECND(SECND10):1840<:ANSWERFIRSTSECNDWDLOOP((FIRST))11sNZ(((FIRST),LOOP,1))|X600bLOOPlVV8:H28vLOOP((SECND))11Z(((SECND),LOOP,1))600LOOP560VV745(4LNZ(((SECND),LOOP,1))$600.LOOP7520AVV7V45(4LNG),31V`VV2iH28s2290TIMERTIMER1TIMERUPTIME25101520 MULTIPLICATION BLOCKENPT28&V8:H28%0FIRST101SECND101FIRS1520 "" SUBTRACTION BLOCK.,ENPT28;6V8:H28R@ANSWERFIRSTSECNDJANSWER0HOLDERFIRST:FISTSECND:SECNDHOLDER:1600TLOOP((FIRST))11^Z(((FIRST),LOOP,1))h600rLOOP|VV8:H28LOOP((SECND))1111 nZ(((FIRST),LOOP,1)))x6003LOOPBVV8:H28]LOOP((SECND))11yZ(((SECND),LOOP,1))600LOOP500VV745(4LNG),31VVV2H282290TIMERTIMER1TIMERUPTIME2510RIATE BLOCKS #BLOCK(4(1))18COL(15(1))1A COLGWCNTRCNTR1{(CNTR143990: END THE PROGRAM-BLOCK1340,1570,1810,205021270< ADDITION BLOCKFENPT28PV8:H28ZANSWERFIRSTSECNDdLOOP((FIRST))NjLEVEL1000NtUPTIME300'N~TIME0gN LEVEL IS AN ARBITRARY NUMBER TO HELP DETERMINE DIFFICULTYN GET NUMBERS TO USENFIRST(LEVEL(1))1NSECND(LEVEL(1))1NANSWER0NLNG((FIRST))4NSECNDFIRSTLNG((SECND))4O MFLAG0MSCRESCRE1&M$TIME0KM.V,V2H:V2,V5H1:V,V2H2{M8V,V5H4:H5,H6V:H5,V2:H5,H6V5MBH8,H10V:H8,H10V2:H8,H10V5:H8,V1:V3,V4H10MLV,V3H12:H12,V5:890:MV CONTROL BLOCKM`US$"" 42,478:9,42:9,47:42,4710OL42,4712:13,42:13,45:43,4414:46,4714xL42,4716:17,1842:17,44:17,1847LV42:H20:470LH25LLL1((SC)):Z(((SC),LL,1))L590:HH8:LLLF1AGF1AG1:1110LM ........YES !26,3516:26,2715:34,3515:34,3517gKf19,2326:19,2327:19,2330:19,2331:19,2334:19,2335Kp26,3119:26,3523KzM11500:MK0:V047:0,39V:VK5K0,242:43,440:1,244:45,472:0,147K42,474:5,642:5,647L8,1318:8,1322:14,1519:14,1521:16,1720YJ8,1724:25,278:25,2612:25,2817pJ8,1730:31,3417J 13,2622:13,2623:13,2638:13,2639J24,3713:24,3726J 14J*V2437J414,25VJ>VJH8JR ....LEVEL NUMBER'K\SINZ0İ220IXZ1İ240+IbZ2İ2709IlZ3İ300GIvZ4İ320UIZ5İ340cIZ6İ360qIZ7İ380IZ8İ400IZ9İ420IHH4II ....TITLE PAGE GRI8I8,176:7,1017I8,1712:13,158:13,1412:13,1617/J+*HV,V5H1:V2,V3H:V2,V3H2::H ........-VHH,H2V3:H,H2V2:hH ........../HH,H2V3:H,H2V2:H1,V:H1,V5:H& ..........XH0V,V1H:V4,V5H:V2,V3H1H:V,V1H2:V4,V5H2:ID ....PRINT NUMBER2:H1,V5:)G .....................9SGV,V5H2:V,V2H:H1,V:H1,V2:pG .....................?GH,H2V:H1,H2V2:H2,V1:H1,V3:H1,V5GG .....................=GH,H2V1:H,H2V4:H .....................V:H,H2V2:H,H2V5:H,V1:V3,V4H2:JFh ....................6FrV,V5H:V2,V5H2:H1,H2V:H1,V2:H1,V5:F| .....................7FH,H2V:V,V5H2:F ......................8 GV,V5H:V,V5H2:H1,V:H1,V..............22EH,H2V:H,H2V3:H,H2V5SE"H,V1:H,V4:V1,V2H2:lE, .................3E6H,H2V:H,H2V5:V,V5H2:H1,V2:E@ .....................4EJV,V3H:V,V5H2:H1,V3:ET ...................5.F^H,H2:V047:0,39V:VD710;D ...(BLANK)............. \D0:L05:H,H3VL:L:COLbDD ....................0DV,V5H:V,V5H2:H1,V:H1,V5:D ....................1DV,V5H1:H,V5:H2,V5DH,V:E .........COPIED*%C *FOR EDUCATIONAL USE &*CC *MAY NOT BE SOLD.COPY-*aC! *RIGHT 1982 CUE,INC *C" ***********************Cd::16302,0Cn0CxV4047:0,39V:VCM1100CH((1)39):V((1)39):((1)15)1CH,VCMD0* *5B * 333 MAIN STREET *SB * REDWOOD CITY *qB * CA 94063 *B * *B * (415)363-5472 *B * *B ***********************C *PROGRAM MAY BE *********'A * *EA * SAN MATEO COUNTY *cA * OFFICE OF EDUCATION *A * & *A * COMPUTER-USING *A * EDUCATORS *A * *A * SOFTSWAP *B #!@ LEVEL 19 10-FEB-83.@ L@ MATHEMATICS DRILLW@ b@ x@ APPLE II+@ @ BY RICHARD PITCHKA@ @ MODIFIED BY: SHAUN MC EVOY A **************             >G(1)HG.5ī2190*RSM2:PT1<\A(9(1))1NfB(9(1))1`pAB10ī2150jz1690t2110SM1:PT2A(10(1))B((11A)(1))43202110 HARD +TV200SM2A((1)5)5B((1)9)] X19,Y2] X21,Y2*] X23,Y2:] Y,Y5X26K] X26,X29Y^] X26,X29Y2q]* X26,X29Y5]4 Y,Y5X31]> Y,Y2X34]H X31,X34Y]R X31,X34Y2]\ X32,Y3]f X33,Y4]p X34,Y5]z YY9] Y,Y5X^ Y,YX4\N Y3,Y5X5!\X X3,Y30\b Y,Y5X7@\l Y,Y5X11K\v M14\\ X6M,YM1c\ Mt\ X13,X16Y\ X13,X16Y2\ X13,X16Y5\ Y,Y2X13\ Y2,Y4X16\ Y,Y1X18\ Y,Y1X24\ Y3,Y5X20] Y3,Y5X22 Y1,Y4X11 [ Y5,Y6X130[ Y,Y5X20A[ X18,X22YQ[ Y,Y5X24a[ Y,Y5X27t[ X24,X27Y2[ Y,Y5X29[ X29,X32Y[ X29,X32Y2[ X29,X32Y5[ YY9[& X3,Y[0 Y1,Y3X2[: Y3,Y5X1\D Y1,Y3:MZ M139Z 0"Z 1,39M)Z M2Z COL;Z 890AZ UZ THE ANSWER IS\Z" 0hZ, M139tZ6 1,39M{Z@ MZJ 9ZT X0:Y0Z^ Y,Y5XZh M14Zr XM,YMZ| MZ Y,Y5X4Z X7,X10YZ Y1,Y4X6Z X7,X10Y5[ NO!Y2 TIME0"Y< FLAG2ī28402YF FLAGFLAG1RYP SCRESCRE1:SCRE0SCRE0eYZ 8:VV1:HH1rYd V,V4H}Yn M14Yx HM,HM1Y MY V,V4H4Y V1,V3H6Y H7,H9VY H7,H9V4Y V1,V3H10Y H12,V4Z M1500MER1X TIMERUPTIME2480&X 22609X CHECK ANSWEREX V2:H2SX US(US$)vX USANSWERV2:H2:1030:2530X 2600X 0X LL11500:LLX LL140:1,39LL:LLX US$""X COLX USANSWER1110X BLOCK1310,1540,1780,2020Y( SS21US$(US$,2):190:0:H,H3V8:COLQW$ KPRESS21HENPTHH4:190:2260eW. KPRESS212260W8 KPRESS48KPRESS572260WB H82260WL H362260WV 0W` H,H4V8Wj COLWt Z((KPRESS))W~ 590W US$(KPRESS)US$X TIMERTIV12V((FIRST))3HH3/VHH18:ENPTH9V3680KVTIMERTIMER1bVTIMERUPTIME2480lV1490rVV USER ANSWERVH,H4V8VKPRESS(16384)VKPRESS1282450V16368,0V KPRESSKPRESS128V KPRESS13ī2480*W KPREUANSWERFIRSTSECNDBU HOLDERANSWER:ANSWERFIRST:FIRSTHOLDER]U*LOOP((FIRST))11yU4Z(((FIRST),LOOP,1))U>590UHLOOPURV1,V5H2:HH3:H5,33V2U\LOOP((SECND))11UfZ(((SECND),LOOP,1))Up590UzLOOPVVЊVV7T45(4LNG),31V&TVV2/TH289T2260KTTIMERTIMER1bTTIMERUPTIME2480lT1490rTT DIVISION BLOCKTUS$""TFIRST(FIRST10):SECND(SECND10):FIRST101SECND1012040TFIRST0SECND01110T V22:H24101SECND101FIRST(FIRST10):SECND(SECND10):1810QSANSWERFIRSTSECNDlS&LOOP((FIRST))11S0Z(((FIRST),LOOP,1))S:590SDLOOPSNVV8:H28SXLOOP((SECND))11SbZ(((SECND),LOOP,1))Sl590SvLOOPS550TOOP((SECND))110RrZ(((SECND),LOOP,1))9R|590CRLOOPLR510VRVV7kR45(4LNG),31VuRVV2~RH28R2260RTIMERTIMER1RTIMERUPTIME2480R1490RR MULTIPLICATION BLOCKRENPT28RV8:H28:SFIRSTMERUPTIME2480Q1490Q7Q SUBTRACTION BLOCKCQENPT28PQV8:H28gQ"ANSWERFIRSTSECNDQ,ANSWER0HOLDERFIRST:FISTSECND:SECNDHOLDER:1570Q6LOOP((FIRST))11Q@Z(((FIRST),LOOP,1))QJ590QTLOOPQ^VV8:H28RhLPFLOOP((FIRST))115PPZ(((FIRST),LOOP,1))>PZ590HPdLOOPWPnVV8:H28rPxLOOP((SECND))11PZ(((SECND),LOOP,1))P590PLOOPP490PVV7P45(4LNG),31VPVV2PH28P2260PTIMERTIMER1QTI GOTO APPROPRIATE BLOCKS /OBLOCK(4(1))1DOCOL(15(1))1MOCOLSOcOCNTRCNTR1O CNTR143960: END THE PROGRAM OBLOCK1310,1540,1780,2020O1240O ADDITION BLOCKO(ENPT28O2V8:H28O<ANSWERFIRSTSECND((1)5)5 B((1)9)10 AB11ī2490: 1690D 2450R SM1:PT2f AB(8(1))11~ A9((19AB)(1)) BABA 4320 2450 X3( TV2752 SM1< G(1)F G.6A3P G.2G.6A2Z G.2A1d B(11AB11ī22801690( 22705 HARD -@ TV275I$ SM1]. AB(8(1))11u8 A9((19AB)(1))B BABAL 4320V 2350` HRj TV275t 2440~ 2420 HR'S ROUTINE G(1) G.5ī2530 SM2:PT1  A1580 6:26:"A ";A.8:26:"B ";BC10:26:"C ";CX(12:26:"D ";Dr214:26:"E NONE OF"<15:29:"THE ABOVE"F20:958:4:"A, B, C, D, OR E? ";A$P(A$)0ī1350ZJ1(A$)d(A$,J,1)" "1410nJx130t8:14:4~12:"X ";6.12:"---"FA10:B12:C46:D64VP18:R$"E"`1290q9:9:"---"7:"2 ) 8"A0:B1:C3:D4:P19:R$"D"12909:9:"----"7:"3 ) 18"A6:B21:C48:D318:P20:R$"A"1290"- ";4412:"-----"6A228:B232:C236:D328FR$"A":P15P1290`8:14:200r12:"- ";41$12:"-----".A151:B159:C241:D2598R$"B":P16B1290L10:8:"3 X 8 ="VA11:B18:C24:D38`P17:R$"C"j129-----"\R$"D":P13,f6:26:"A $.66"Cp8:26:"B $7.66"\z10:26:"C $17.06"u12:26:"D $27.06"13308:14:30012:"- ";712:"-----"A93:B293:C307:D393R$"B":P1412908:14:272 12:"----"A39:B43:C53:D54/R$"A":P1091290P10:8:"60 - 7 ="hA50:B52:C53:D67xR$"C":P11 129010:8:"99 - 91 =" A0:B9:C98:D180*R$"E":P1241290>8:14:"$29.36"H13:"- 2.30"R13:"-- 01290:8:14:747+D12:"- ";13<N12:"-----"VXA24:B34:C724:D734ebR$"D":P8ol1290v8:14:40612:"- ";30612:"-----"A100:B712:C813:D900R$"A":P912908:14:4712:"- ";812:.35"12:26:"D $1.45"&133056:14:48A14:53L15:3]12:"+ ";4m12:"----"{A7:B98:C108:D918:R$"C":P612908:14:22712:"+ ";35512:"-----"A572:B582:C682:D5712&R$"B":P721:B22:C37:D3792:R$"A":P3) "12908 ,7:14:22D 614:15U @12:"+ ";31e J12:"----" TA68:B78:C79:D80:R$"A":P4 ^1290 h10:5:"$0.58 + $0.77 =" rR$"C":P5 |6:26:"A $.35" 8:26:"B $1.25"10:26:"C $111500:TM3 936:11:"WHAT IS YOUR NAME? ";N$= 936T 10:8:"4 + 77 ="y A73:B81:C477:D774:R$"B":P1 1290 8:14:7 12:"+ ";5 12:"---" A2:B13:C57:D75:R$"E":P2 1290 10:5:"3 + 7 + 9 + 2 =" ABE COPIED*(  *FOR EDUCATIONAL USE &*F *MAY NOT BE SOLD.COPY-*d ! *RIGHT 1982 CUE,INC * " *********************** d:936 n8:11 x"COMPUTATION TEST 13C" :" LEVEL XX" A(30) X130:A(X)0:X TM * *8  * 333 MAIN STREET *V  * REDWOOD CITY *t  * CA 94063 *  * *  * (415)363-5472 *  * *  ***********************  *PROGRAM MAY ************* * *H  * SAN MATEO COUNTY *f  * OFFICE OF EDUCATION *  * & *  * COMPUTER-USING *  * EDUCATORS *  * *  * SOFTSWAP * !" LEVEL 20 10-FEB-83/ M MATHEMATICS DRILLX c z APPLE II +  BY RICHARD PITCHKA  MODIFIED BY: SHAUN MC EVOY ***********     !!! ! Y,Y5X24-ZY,Y5X27.-dX24,X27Y2>-nY,Y5X29O-xX29,X32Yb-X29,X32Y2u-X29,X32Y5-YY9-X3,Y-Y1,Y3X2-Y3,Y5X1-Y1,Y3X4-Y3,Y5X5-X3,Y3-Y,Y5X7-Y,Y5X11. THE ANSWER IS,0",M139.,1,39M5,M<,9H,X0:Y0U,Y,Y5X`,M14m,XM,YMt,M,Y,Y5X4, X7,X10Y,Y1,Y4X6,X7,X10Y5,(Y1,Y4X11,2Y5,Y6X13,<Y,Y5X20,FX18,X22Y -P + NO!+HR0(+FLAG2ī50108+FLAGFLAG1?+8M+25,2926X+M14g+26M,25Mn+M|+25,2930+$26,2832+.33,3525+833,3529+B26,2836+L38,29+VM1500:M+`M139+j0+t1,39M+~M+,4440 * **:*4:*>$*H>*R IF YOU FIND ERRORSY*\ OR HAVE SUGGESTIONSs*f FOR IMPROVING THIS*p PROGRAM, WRITE TO:*z* RICHARD PITSCHKA* P.O.BOX 468* SAN JUAN BAUTISTA* CALIFORNIA 95045*+1180: GET AN)ANBī45406)1560: RIGHT SUBR<)[)AXB:4800: NO SUBROUTINEw)4200: SET UP PROBLEM)AXB:4800: NO SUBROUTINE)ZB:830)TM11500:)RERE1)RE3RE1)MA(RE)A:MB(RE)B:JV(RE)3) PT(RE)PT*1760(&M13"(0JV(M)JV(M)1((:9(DSM1ABABJ(NSM2ABABf(X4200: SET UP PROBLEM(b21:40):21:"NUMBER RIGHT....";NR;" IN A ROW....";HR(l23:"PUSH WHEN ANSWER OK";(vNR9ĺ" ";(HR9ĺ" ";(" " )H9'AB9ī4260 'ZO:830*'42807'ZT:830J'ZO:HH4:830`'HH4:SM730,750s'HH4:ZA:830'HH4:690'' SUB & DIV ROUTINE'I13'JV(I)1ī4370''4390'AMA(I):BMB(I)(PT(I)1PT(I)3SM3SM:.5ī4140&SM2:PT1(&A((1)5)5:&B((1)9)1L&AB11ī4100V&1690`&"3910n&,SM1:PT2&6AB(8(1))11&@A9((19AB)(1))&JBABA&T4320&^3910&h:COLR15(1)1:COLR&rT(AB10):OAB((AB10)10)'|V11: %4320%(3850%2 EXP'%<TV257%FG(3(1))H%PG3990,4050Q%Z XR_%dSM1:PT3q%nA(6(1))4%xB(10(1))%1690%3910% DR%SM2:PT4%A(6(1))4%B(10(1))%4320%3910% HR%G(1)&GG.4A8$G.4G.6A71$G.6G.7A6E$G.7G.8A5Z$G.8G.87A4p$G.87G.92A3$G.92G.95A2$G.95G.96A1$G.96A0$1690$3690$ DR$TV50$SM2$ A(6(1))4$B(10(1)) X9R# TV50# SM1)# A(5(1))5:# B(10(1))D# 1690N# 3540X# D9Rb#TV80k#SM2v#LN$""#$A(9(1))1#.B(10(1))#84320#B3620#L XR#VTV35#`SM1#jB(10(1)):G(1)#tG0G.2A9 $~G.26" B(10(1))" 1690'" 32901" HRF;" TV50E" 2440O" 3350Z"* X78d"4 TV80m"> SM1"H A(2(1))7"R B(10(1))"\ 1690"f 3400"p X89"z TV80" SM1" A(2(1))8" B(10(1))" 1690" 3470# 80 ! SM1! A(4(1))3.!& B(10(1))8!0 1690B!: 3100M!D D6RW!N TV80`!X SM2q!b G(10(1))y!l AG!v G0A3! G7A4! G8A5! G9A6! B(10(1))! 4320! 3170! X67! TV80! SM1" A(2(1))G.2G.6A2 J G.6A3. T B(10(1))8 ^ 4320B h 2860M r X34W | TV80` SM1r A(2(1))3 B(10(1)) 1690 2960 X56 TV80 SM1 A(2(1))5 B(10(1)) 1690 3030 X6R ! TV0(1))n 1690x 2620& HRT0 TV90: 2440D 2710O X3FY TV90b SM1m G(1){ G.6A3 G.6G.2A2 G.2A1 B(10(1)) 1690 2760 D3 TV275" SM2, G(1)6 G.2A1 @ M4M3H4H31690^ WRONGSh18:"NO...THE RIGHT ANSWER IS "H3" HRS "M3" MINS"\rMS2e|510n600w470 RIGHT18"VERY GOOD !"R3R31MSMS1510600470 MULTIPLES OF 10A((1)9991)2:1:(15);6:133H1" HRS "M1" MINS"S11)"+ "H2" HRS "M2" MINS"n11)"---------------"v12"HOW MANY HOURS?";200H4Q""HOW MANY MINUTES?";,2006P3P31@M4QJM359M3M360:H3H31T(4702 RIGHT<:-F"VERY GOOD !"9PR2R21EZMSMS1Nd510Wn600`x470u ADD HRS & MINSH1((1)91)H2((1)91)M1((1)15020)M2((1)5010)H3H1H2:M3M1M2M360M3M360:H3H31:1465tDABC~2:1:(15);((18);28:2KA" + "B" + "C" = ?"W:::h"ANSWER :";q200}P2P21(DQ).0000113301250 WRONG(18);:"NO...THE RIGHT ANSWER IS ";D MS2510600THE RIGHT ANSWER IS "BMS2(5101600:470@S"VERY GOOD !"_R1R11kMSMS1t$510}.6008470B ADDING DECIMALSLE1((1)31)VA((1)29001000)(10E1)`B((1)19010)10jC((1)991)100 / 4*A((1)16040).4B((1)680100)A>E1((1)31)QHBB(10E1)[RCABm\2:1:(15);yf(17);p8z4)C" & "A" = ?"::"ANSWER :";200P1P11(QB).00011020950(18);18"NO...! NAMES OF PROBLEM TYPES,A(15)AL1$"8.184 / 62"^L2$"27.2 + 3.001 + .03"uL3$"HRS AND MINS"L4$"X WITH 10, 100, 1000"L5$".2 X 4.8"L6$"NUMBER WORDS"L7$"NOTHING"L$"LEVEL 26" NP6470  28.8 R4R5R6R7TP0TP18&SC((TR100TP))2TRTRJ01:1:(14);V:(18);uDL$;:28:"SCORE...";(SC){NX CONTINUE OR QUITbFL1l23:(15);v" PUSH TO CONTINUE";:G$G$"@"ġ:2900FL0460!Q$(Q$,QL,(Q$)QL1)'QPT860,1150,1470,1810,2140,2470,7100l SELECT PROBLEM TYPEzMS0500PT((1)6)1PT800,1090,1410,1770,2070,2370,7000 FIGURE & PRINT SCORETPP1P2P3P4P5P6P7 TRR1R2R3 6"USE ZERO IN NUMBERS,"5 @"NOT THE LETTER O!"F JTM14000:| T:2:(15):PT860,1150,1470,1810,2140,2470,7100 ^ STRING INPUT h"";Q$ r(Q$)0340 |(Q$)64ġ:2900 QX(0) QL1(Q$) (Q$,QL,1)" "440 (18)& 17:"WHAT'S YOUR NAME? ";N$> (N$)0ĺ(7):150N TM1500:Y (12)b 680z INPUT SUBROUTINE "";Q$ (Q$)0340 QL1(Q$) (Q$,QL,1)"O"300 Q(Q$) (Q$)64ġ:2900 QX(0) " ,:E COPIED*'  *FOR EDUCATIONAL USE &*E *MAY NOT BE SOLD.COPY-*c ! *RIGHT 1982 CUE,INC * " *********************** d(4);"BRUN LOMEM:":16384 n(4);"BRUN HIGHER TEXT":(4);"BLOAD ROMAN TEXT" x7:11 (17)"LEVEL XXVI" * *7  * 333 MAIN STREET *U  * REDWOOD CITY *s  * CA 94063 *  * *  * (415)363-5472 *  * *  ***********************  *PROGRAM MAY B***********) * *G  * SAN MATEO COUNTY *e  * OFFICE OF EDUCATION *  * & *  * COMPUTER-USING *  * EDUCATORS *  * *  * SOFTSWAP * +! LEVEL 26 10-FEB-83. L MATHEMATICS DRILLW b y APPLE II +  BY RICHARD PITCHKA  MODIFIED BY: SHAUN MC EVOY ************           M14.X6M,YM1.M..X13,X16YA.X13,X16Y2T."X13,X16Y5d.,Y,Y2X13v.6Y2,Y4X16.@Y,Y1X18.JY,Y1X24.TY3,Y5X20.^Y3,Y5X22.hX19,Y2.rX21,Y2.|X23,Y2.Y,Y5X26/X26,X$! "NO...THE RIGHT ANSWER IS "K6$-! MS26! 510?! 600H! 470P! 16c! "VERY GOOD !"o!" R6R61{!, MSMS1!6 510!@ 600!J 470!T DISPLAY WORK RECORD!^ AP$"ATTEMPTED...."!h CR$"CORRECT......"!r (12)!| (18)" N$; 9808,NINETY-EIGHT THOUSAND EIGHT,NINE THOUSAND EIGHT HUNDRED EIGHT,NINETY-EIGHT EIGHT,NINE HUNDRED EIGHT HUNDRED EIGHT,B 7440,SEVEN THOUSAND FORTY-FOUR,SEVEN HUNDRED FORTY-FOUR,SEVEN THOUSAND FOUR HUNDRED FORTY,SEVENTY-FOUR HUNDRED FOUR,C! 16DRED,ONE THOUSAND THIRTY,ONE HUNDRED THREE,C 5400,FIFTY-FOUR THOUSAND,FIVE THOUSAND FOUR,FIVE THOUSAND FORTY,FIVE THOUSAND FOUR HUNDRED,D 9088,NINE THOUSAND EIGHTY-EIGHT,NINETY EIGHTY-EIGHT,NINETY THOUSAND EIGHTY EIGHT,NINETY HUNDRED EIGHT,A| -TWO,DY 670,SIX HUNDRED SEVENTY,SIXTY-SEVEN,SIX THOUSAND SEVENTY,SIX HUNDRED SEVEN,A 3013,THREE THOUSAND THREE,THREE THOUSAND THIRTEEN,THREE THOUSAND THREE HUNDRED ONE,THREE HUNDRED THIRTEEN,B, 1030,ONE THOUSAND THREE,ONE THOUSAND THREE HUNHT HUNDRED,EIGHTY-SIX,ASn 97,NINETY,NINETY-SEVEN,SEVENTY-NINE,SEVENTY HUNDRED,Bx 709,SEVENTY-NINE,SEVEN HUNDRED NINETY,SEVEN HUNDRED NINE,SEVEN NINE,C 852,EIGHT THOUSAND FIFTY-TWO,EIGHTY-FIVE TWO,EIGHT HUNDRED TWENTY-FIVE,EIGHT HUNDRED FIFTYONE HUNDRED FIVE,ONE HUNDRED FIFTY,BaF 76,SEVENTY,SIXTY-SEVEN,SEVENTY-SIX,SEVEN HUNDRED SIX,CP 32,THIRTY-TWO,TWENTY-THREE,THIRTY,THREE HUNDRED TWENTY,AZ 83,THIRTY-EIGHT,EIGHTY,EIGHT HUNDRED,EIGHTY-THREE,Dd 68,SIXTY-EIGHT,SIXTY,SIXTY-EIG (18); 6= "THE NUMERAL "K1$" AS NUMBER WORDS IS:"C S " A. "K2$c " B. "K3$s " C. "K4$ " D. "K5$  "ANSWER :"; 350 P6P61( (Q$,1)K6$28302 2770$< 1005,ONE THOUSAND FIFTY,ONE THOUSAND FIVE,R51 MSMS1$ 510#. 600,8 470?B NUMBER WORDS_L J((1)15)1:A(J)12380jV A(J)1` I1J:K1$,K2$,K3$,K4$,K5$,K6$:j K1CABt K1CAB~ :D6D61 D6132470 I115:A(I)0: D60 2:1:(15); \2:1:(15);f(17);$p6:z4)A" X "B" = ?"O::"ANSWER :";X200dP5P51|(QC).0000123002230(18);18"NO...THE RIGHT ANSWER IS "CMS2510600470 "VERY GOOD !" R5ANSWER IS "C510600'4703 RIGHT;13GMSMS1SR4R41f"VERY GOOD !"o510x600 470 .8 X 4.3 A((1)55)*B((1)19010)4E1((1)2):E2((1)3)>AA(10E1)HBB(10E2)RCABB(10(((1)31)))CAB12:1:(15);87J&R((1)21)X0R11870k:A" X "B" = ?"uD1880NB" X "A" = ?"X10:"WHAT IS THE PRODUCT? ";b200lP4P41vQC1990 WRONGMS213 "NO...THE RIGHT :3,379:3,3713:3,3717:3,3721:3,3725:3,3729OAN8:I3:J37:K6:L8Y1280c1340{ SHADE IN FRACTION 2TMIJK,LTM(TM2<0FH36:V11:210P36,3818Z936:22:"WHAT PART IS SHADED?"dNTNTAN6:I15:J25:K2:L16!t1280+~1340R2,3220:3,379:3,3717:3,3725oAN8:I21:J37:K10:L16y128013403,375:3,379:3,3713:3,3717:3,3721:3,3725:3,3729AN8:I3:J37:K22:L241280134053,375,3725"AN4:I3:J37:K10:L16,128061340L2,3220:3,3717hAN4:I3:J19:K18:L32r$1280|.134082,328:2,3214:2,3220:2,3226:2,3232BAN6:I27:J31:K2:L32L1280V1340`3,3717:2,3214:2,3226j920,960,1000,1040,1080,1120,1160,1200,12407p2,3817RzAN2:I3:J37:K2:L16\1280f1340s2,3220AN2:I3:J19:K2:L32128013402,3214:2,3226AN3:I15:J25:K2:L32128013403,379:3,3717:3:21,2534:21,2535:28,2925:32,33219M11500:MS0:V047:0,39V:Va16301,0k:15wV039 0,39VV 0*1,33242,3833>1,3338H2,381RNT12RT(NT.1).81680\X(10(1))1*fX880,22:12,2723:12,2738:12,2739824,3712:24,3727@14MV2437Z13,26VaVh0 ....LEVEL NUMBER14,1826:14,1827:14,1830:14,1831:14,1834:14,1835:28,2918:32,3314(21,2526:21,2527:21,2530:21,2531Z8İ370Z9İ390 &90 ....TITLE PAGE GR@:8UD8,176:7,1017N8,1712:13,158:13,1412:13,1617X8,1318:8,1322:14,1519:14,1521:16,1720b8,1724:25,278:25,2612:25,2817l8,1730:31,3417 v12,272:V,V2H:H1,V:H1,V2:: .....................?oH,H2V:H1,H2V2:H2,V1:H1,V3:H1,V5u ....PRINT NUMBERSZ0İ190Z1İ210Z2İ240Z3İ270Z4İ290Z5İ310Z6İ330Z7İ350 ...............6ITV,V5H:V2,V5H2:H1,H2V:H1,V2:H1,V5:g^ .....................7hH,H2V:V,V5H2:r ......................8|V,V5H:V,V5H2:H1,V:H1,V2:H1,V5: .....................9V,V5HȍH,V4:V1,V2H2:/  .................3] H,H2V:H,H2V5:V,V5H2:H1,V2:{ " .....................4 ,V,V3H:V,V5H2:H1,V3: 6 ...................5 @H,H2V:H,H2V2:H,H2V5:H,V1:V3,V4H2:J ..... 0:V047:0,39V:V! 560? ....................0i V,V5H:V,V5H2:H1,V:H1,V5: ....................1 V,V5H1:H,V5:H2,V5 H,V: .......................2 H,H2V:H,H2V3:H,H2V5 H,V1:E COPIED*'  *FOR EDUCATIONAL USE &*E *MAY NOT BE SOLD.COPY-*c ! *RIGHT 1982 CUE,INC * " *********************** d936::16302,0 n0 xV4047:0,39V:V M150 H(40(1)):V(40(1)):(15(1))1 H,V M * *7  * 333 MAIN STREET *U  * REDWOOD CITY *s  * CA 94063 *  * *  * (415)363-5472 *  * *  ***********************  *PROGRAM MAY B***********) * *G  * SAN MATEO COUNTY *e  * OFFICE OF EDUCATION *  * & *  * COMPUTER-USING *  * EDUCATORS *  * *  * SOFTSWAP * ! LEVEL 22 10-FEB-83. L MATHEMATICS DRILLW b y APPLE II +  BY RICHARD PITCHKA  MODIFIED BY: SHAUN MC EVOY ************            CATIONAL USE &*- *MAY NOT BE SOLD.COPY-*K ! *RIGHT 1982 CUE,INC *i " *********************** d(4);"BRUN LOMEM:":16384 n(4);"BRUN HIGHER TEXT" s(4);"BLOAD ROMAN TEXT" x7:9 (17)"LEVEL XXV" (18) 17:"WHAT'S*  * 333 MAIN STREET *=  * REDWOOD CITY *[  * CA 94063 *y  * *  * (415)363-5472 *  * *  ***********************  *PROGRAM MAY BE COPIED*  *FOR EDU */  * SAN MATEO COUNTY *M  * OFFICE OF EDUCATION *k  * & *  * COMPUTER-USING *  * EDUCATORS *  * *  * SOFTSWAP *  * " LEVEL 25 14-FEB-83/ N MATHEMATICS DRILLY d | APPLE II +  BY RICHRD PITCHKA  MODIFIED BY: SHAUN MCEVOY *********************** * !!!!!!!!!""" " " " " """  3)12:L(4)16:L(5)20:L(6)24:L(7)28+! 9! AN1:AD6S! LP8326:1,32LP:_! I(1)21k! J(1)25v! K(1)2! L(1)32! ! AN1:AD6! 2,3214:2,3226:3,3717! I(1)3! J(1)13!" K(1)18!, L(1)32!6 !@ AN2:AD3"J 1,12:L(4)16:L(5)20 d & n AN7:AD8@ x LP5294:3,37LP:u I(1)3:I(2)3:I(3)3:I(4)3:I(5)3:I(6)3:I(7)3 J(1)37:J(2)37:J(3)37:J(4)37:J(5)37:J(6)37:J(7)37 K(1)2:K(2)6:K(3)10:K(4)14:K(5)18:K(6)22:K(7)26%! L(1)4:L(2)8:L(2:K(4)2:K(5)18= L(1)16:L(2)32:L(3)16:L(4)16:L(5)32C Q( AN5:AD8k2 LP5294:3,37LP:< I(1)3:I(2)3:I(3)3:I(4)3:I(5)3F J(1)37:J(2)37:J(3)37:J(4)37:J(5)37P K(1)2:K(2)6:K(3)10:K(4)14:K(5)18 Z L(1)4:L(2)8:L(3))3:I(3)3& J(1)19:J(2)19:J(3)19B K(1)10:K(2)18:K(3)26^ L(1)16:L(2)24:L(3)32d r AN5:AD6 2,3214:2,3226:3,3717 I(1)3:I(2)3:I(3)15:I(4)27:I(5)27: J(1)13:J(2)13:J(3)25:J(4)37:J(5)37 K(1)2:K(2)18:K(3)15:J(1)25:K(1)2:L(1)32L -V AN3:AD4K` 3,379:3,3717:3,3725dj I(1)3:I(2)3:I(3)3t J(1)37:J(2)37:J(3)37~ K(1)2:K(2)18:K(3)26 L(1)8:L(2)24:L(3)32  AN3:AD8 3,379:3,3717:3,3725:1,3220  I(1)3:I(22130ZPK176 16368,0'00450APK(16384)_PK136Ġ15:450:0:2130{PK141Ĺ16368,0:22902250AN1:AD2 2,3220 I(1)3:J(1)19:K(1)2:L(1)32 $ AN1:AD3. 1,33148 1,3326B I(1)TM14000:3220"1680,:22A "VERY GOOD !"MRTRT1^ TM11500:h*3220r41680> GET INPUTSH16368,0RPK(16384)\PK175PK1862210f0p410zTM1300:TM15:410TM1150:TMI(T)J(T):K(T),L(T)TM!D'N:X WORK PROBLEMBb22bl"WHAT FRACTION IS SHADED?"nvNTNT1x3190H36:V112110Q1ZV202110Q1ANZAD20503160:22"NO...THE RIGHT ANSWER IS "AN"/"ADN15V039'0,39V.V50A1,332N2,3833\36,3818i1,3338u2,381X((1)131)X2300,2340,2390,2460,2530,2600,2670,2740,2810,2880,2950,3020,3090,5300,5400,5500,56002&T1AN 0TM00PK141Ĺ16368,0:1560(15208ANZī1620B"3160w,936:22:"NO....THE RIGHT ANSWER IS 1/";AN;"."6TM14000:TM@3220J750T936:22:"VERY GOOD!"^RTRT1hTM12000:TMr3220|750 NUM & DE1 n3190$x16368,0:V20:H365PK(16384)MPK175PK1861480Y0:410kTM1400:TMx15:410TM1200:TM1410ZPK176:16368,0:H36:V20045016368,0PK(16384)PK136Ġ15:450:0:14G3FLAG0:1700540P18:"NO...THE RIGHT ANSWER IS "H3" HRS "M3" MINS"YMS2b550k630t490 RIGHT18"VERY GOOD !"R3R31MSMS1550630490& MULTIPLES OF 100A((1)9991):BS""11)"+ "H2" HRS "M2" MINS"=11)"---------------"E12]""HOW MANY HOURS?";f,210o6H4Qu@J"HOW MANY MINUTES?";T210^P3P31hM4QrM359M3M360:H3H31|M4M3H4H31750 WRONGFLAGFLAG1:FLARIGHT d: n"VERY GOOD !",xR2R218MSMS1A550J630S490h ADD HRS & MINS{H1((1)91)H2((1)91)M1((1)16020)M2((1)5010)H3H1H2:M3M1M22:1:9586:13H1" HRS "M1" MIN15"------":::9"WHAT IS THE SUM? ";B210NP2P21f(DQ).000011370p1280| WRONG FLAGFLAG1:FLAG3FLAG0:1310540:("NO...THE RIGHT ANSWER IS ";D2MS2<550F630P490Z "VERY GOOD !"#R1R11/MSMS18550A$630J.490`8 ADDING DECIMALS|BA((1)30601000)100LB((1)20010)10VC((1)210)100`DABCj2:1:958t6:16~A17B15"+ ";C((1)210400)RCAB*\2:1:958@f8:A" - "B" = ";Ip210UzP1P11cQC1000l920y WRONGFLAGFLAG1:FLAG3FLAG0:95054011:"NO...THE RIGHT ANSWER IS ";CMS2550630490 RIGHT15)L1$"945 - 358"1L2$"ADDING DECIMALS"HL3$"HOURS & MINS"eL4$"X WITH 10,100,1000"|L5$"90 X 238 = ?"L6$"WORD PROBLEMS ( X & / )" L7$"NOTHING"L$"LEVEL 24" NP6*4904 809 - 544>A((1)490500)HBR7DTP0TP10NSC((TR100TP))2TRTR@X1:1:868_bL$;:28:"SCORE...";(SC)el}v CONTINUE OR QUITFL123:1:958" PUSH TO CONTINUE";:G$FL0 NAMES OF PROBLEM TYPESA(PT860,1130,1510,1870,2190,2560,3050B SELECT PROBLEM TYPEPMS0540cPT((1)7)1sCNTRCNTR1CNTR253480PT820,1080,1450,1830,2150,2450,3040& FIGURE & PRINT SCORE0TPP1P2P3P4P5P6P7:TRR1R2R3R4R5R6ETTER O!" ^TM14000:R h:2:1:958:PT860,1130,1510,1870,2190,2560,3050f r STRING INPUTq |"";Q$ (Q$)0360 (Q$)64ġ:3060 QX(0) QL1(Q$) (Q$,QL,1)" "460  480 Q$(Q$,QL,(Q$)QL1) 'TM1500: (12) 7008 INPUT SUBROUTINEC "";Q$Y Q$((Q$))360j (Q$)0360z QL1(Q$) (Q$,QL,1)"O"320  Q(Q$) "(Q$)64ġ:3060 ,QX(0) 6 @: J"USE ZERO IN NUMBERS," T"NOT THE LE COPIED*'  *FOR EDUCATIONAL USE &*E *MAY NOT BE SOLD.COPY-*c ! *RIGHT 1982 CUE,INC * " *********************** d n x7:16 "LEVEL XXIV" 15:"============" 17:"WHAT'S YOUR NAME? ";N$ (N$)0ī160 * *7  * 333 MAIN STREET *U  * REDWOOD CITY *s  * CA 94063 *  * *  * (415)363-5472 *  * *  ***********************  *PROGRAM MAY B***********) * *G  * SAN MATEO COUNTY *e  * OFFICE OF EDUCATION *  * & *  * COMPUTER-USING *  * EDUCATORS *  * *  * SOFTSWAP * ! LEVEL 24 10-FEB-83. L MATHEMATICS DRILLW b y APPLE II +  BY RICHARD PITCHKA  MODIFIED BY: SHAUN MC EVOY ************             ,(Q$)QL1)<PT840,1100,1500,1710,2030,2520,7100W SELECT PROBLEM TYPEeMS0500xPT((1)6)1PT800,1040,1450,1680,1950,2400,7000 FIGURE & PRINT SCORETPP1P2P3P4P5P6P7TRR1R2R3R4R5R6R7TP0MBERS," @"NOT THE LETTER O!"1 JTM14000:g T:2:(15):PT840,1100,1500,1710,2030,2520,7100{ ^ STRING INPUT h"";Q$ r(Q$)0340 |(Q$)64ġ:2920 QX(0) QL1(Q$) (Q$,QL,1)" "440  460 Q$(Q$,QL YOUR NAME? ";N$) (N$)0ĺ(7):1509 TM1500:D (12)M 680e INPUT SUBROUTINEp "";Q$ (Q$)0340 QL1(Q$) (Q$,QL,1)"O"300 Q(Q$) (Q$)64ġ:2920 QX(0) " ,: 6"USE ZERO IN NU0 # 2450# 25600# DISPLAY WORK RECORDH# AP$"ATTEMPTED...."`# CR$"CORRECT......"f# w# N$;:30:L$}#& #0 L1$#: 4:AP$;P1;:22:CR$;R1#D NP23320#N L2$#X 4:AP$;P2;:22:CR$;R2#b NP33320#l L3$ $v 4:AP$;P3;:HOW MANY HOURS,WILL HE HAVE TO WORK TO EARN,#,DOLLARS?["J FLAGFLAG1:FLAG3FLAG0:2910d"T 540l"^ 14"h "NO...THE RIGHT ANSWER IS "A2"r MS2"| 550" 630" 490" 14" "VERY GOOD !"" R6R61" MSMS1" 550" 630# 49 TEAM AND YOU HAVE,#,BOYS?p!, 1,#,EACH OF SALLY'S,#,PET MICE HAD,BABIES. HOW MANY BABY,MICE DOES SALLY HAVE?!6 1,#,ROBERT GONZALEZ EARNS,DOLLARS AN HOUR. HOW MANY,DOLLARS WILL HE EARN IN,#,HOURS?6"@ 0,#,ROBERTO GONZALEZ EARNS,DOLLARS AN HOUR. HE GENEROUS HAS,#,GOOD FRIENDS. SHE DIVIDED,PIECES OF FUDGE EQUALLY AMONG THEM.,HOW MANY PIECES DID EACH FRIEND GET?  1,#,THERE ARE,BOYS ON A TEAM.,HOW MANY BOYS ARE NEEDED TO MAKE,#,TEAMS?!" 0,HOW MANY TEAMS,CAN YOU MAKE IF,BOYS ARE NEEDED FOR,AENDA GAVE EACH OF HER FRIENDS,#,PIECES OF CANDY. SHE GAVE AWAY,PIECES. HOW MANY FRIENDS DID SHE,GIVE CANDY TO? 1,#,GLENDA THE GENEROUS HAS,GOOD FRIENDS. SHE GAVE,EACH OF THEM,PIECES OF FUDGE.,HOW MANY PIECES DID SHE GIVE AWAY?u  0,#,GLENDA T MANY EGGS WILL BOZO HAVE IN,#,DAYS? 0,#,EACH STUDENT DRANK,#,SODAS. IN ALL THEY DRANK,SODAS. HOW MANY STUDENTS,WERE DRINKING SODAS? 1,#,EACH GIRL ATE,#,PIECES OF PIZZA. THERE WERE,GIRLS. HOW MANY PIECES,OF PIZZA DID THEY EAT?p 0,#,GLS TRICYCLE TRAVELS AT A SPEED OF,MILES PER HOUR. HOW MANY HOURS,WILL IT TAKE HUGO TO TRAVEL,#,MILES? 0,#,ALFREDO WORKED,#,HOURS AND EARNED,DOLLARS. HOW MANY DOLLARS,DID HE EARN AN HOUR?$ 1,#,BOZO'S MAGIC GOOSE LAYS,GOLDEN EGGS EVERY DAY.,HOW10 P6P61 QA22970' 2890 1,HOW MANY MILES CAN SPIDERMAN,CRAWL IF HE CRAWLS FOR,#,HOURS AT AN AVERAGE SPEED OF,#,MILES PER HOUR? 0,#,MELVIN BOUGHT,#,SPACE WAR CARDS FOR,#,CENTS. HOW MUCH DOES ONE CARD COST?e 0,#,HUGO'61 D6132560( I115:A(I)0:1 D60A 2:1:958T K1A1B:A2Ch K1A1C:A2Bo 4( K1$"#"26202 K1$< K2$" "AF K3$"#"2650P K3$Z K4$" "A1d K5$"#"2680n K5$x K6$ ::"ANSWER :"; 290L RIGHTV MSMS1&` R5R519j "VERY GOOD !"Bt 550K~ 630T 490t WORD PROBLEMS (X AND /) A((1)73) B((1)65) CAB J((1)15)1:A(J)12490 A(J)1 I1J:K,K1$,K2$,K3$,K4$,K5$,K6$: :D6D 6:14A 13)"X "B013)"----"813V"WHAT IS THE PRODUCT? ";_210kP5P51s16QC2380 WRONG FLAGFLAG1:FLAG3FLAG0:2330 540 MS2$ "NO...THE RIGHT ANSWER IS ";C. 5508 630B 440 MS2135"NO...THE RIGHT ANSWER IS "C>550G630P 490\ RIGHTd 13p*MSMS1|4R4R41>"VERY GOOD !"H550R630\490f 90 X 238pA((1)300100)zB((1)91)100CAB2:1:958(10(((1)31)))DCAB,N2:1:9583X7EbR((1)21)SlR11930fvA" X "B" = ?"p1940B" X "A" = ?"10:"WHAT IS THE PRODUCT? ";210P4P41QC2070 WRONGFLAGFLAG1:FLAG3FLAG0:20105"*SC7SC10ĺ"GOOD."M*SC5SC8ĺ"O.K. BUT IT COULD BE BETTER."*SC4ĺ"PRETTY LOW.":"YOU SHOULD TRY HARDER OR TRY AN EASIER LEVEL."*D$(4)*LL11500:LL*"NOW RETURNING TO MENU."*D$;"RUN HELLO"OR1)dTIMERUPTIME2510$)n3710I)x BLANK SPACE FOR DIVISION BLOCKj)0:L05:H4,HVL:L:COLp)) END THE PROGRAM):)12)"YOU SCORE WAS "SC)"WHICH IS ";)SC14ĺ"INCREDIBLY GOOD."*SC11SC13ĺ"VERY GOOD.0:0:H4,HV8:COL;(KPRESS8HENPTHH4:3960:3710N(KPRESS83710l(KPRESS48KPRESS573710{(H83710(H363710( 0(H4,HV8(COL((HH4(2Z((KPRESS))(<600(FHH12(PUS$US$(KPRESS))ZTIMERTIMEO HELLO"41SC13ĺ"VERY GOOD."1bSC7SC10ĺ"GOOD."bbSC5SC8ĺ"O.K. BUT IT COULD BE BETTER."bSC4ĺ"PRETTY LOW.":"YOU SHOULD TRY HARDER OR TRY AN EASIER LEVEL."bD$(4)bLL11500:LLb"NOW RETURNING TO MENU."bD$;"RUN HELLO"PRESS)a<TIMERTIMER1/aFTIMERUPTIME24809aP3680^aZ BLANK SPACE FOR DIVISION BLOCKad0:L05:H4,HVL:L:COLanax END THE PROGRAMa:a12a"YOU SCORE WAS "SCa"WHICH IS ";aSC14ĺ"INCREDIBLY GOOD."bSC1(US$,(US$)1):3930:0:H4,HV8:COLP`KPRESS8HENPTHH4:3930:3680c`KPRESS83680`KPRESS48KPRESS573680`H83680`H363680`0`H4,HV8`COL` HH4`Z((KPRESS))`590`(HH12a2US$US$(K AB1820B$">""1830-B$"<"=&B$Q$1890d014:"NO...THE RIGHT ANSWER IS "B$m:MS2vD510N600X470b14:"VERY GOOD ! "lMSMS1vR4R41510600470 NUMBER SEQUENCESR(3(1)) hMSMS1r510|600$4706 USE < OR >ZA((1)5050):B((1)5050)hAB1690y2:1:(15)8:A" ";50,63:" ";:50,255" ";B::"USE < OR > ";3508:A;" ";Q$;" ";B:M1350:MP4P4100)400B((1)80)200C((1)200)20<DABCM2:1:(15)T8mA" + "B" + "C" = ";v200P3P3111QD1620""NO...THE RIGHT ANSWER IS "D,MS26510@600J470T"VERY GOOD !"^R3R31 200P2P211Q1000M100H10TO1380:(MS2B2:w<"NO...THE RIGHT ANSWER IS ";1000M100H10TOF510P600Z470dMSMS1n:x"VERY GOOD !"R2R21510600470 217+29+43=A((1)5 jO" ONES" tM" THOUSANDS".~T" TENS"@H" HUNDREDS"J1270]M" THOUSANDS"kO" ONES"}H" HUNDREDS"T" TENS"1270T" TENS"O" ONES"H" HUNDREDS"M" THOUSANDS":"WHAT IS THE NUMBER? "; "VERY GOOD !""R1R11.MSMS17510@600I470[ PLACE VALUEuO((1)9):O11050$T((1)9):T11060.H((1)9):H110708M((1)7)2BZ((1)3)1L2:(15);(18);V4`Z1130,1180,1230 443*A((1)500500)04B((1)100400):>CABTH(18);:2:1:(15);jR8:A" - "B" = ";s\200fP1P11pQC960z9009:(15)11:"NO...THE RIGHT ANSWER IS ";CMS25106004709:(15);OBLEM TYPESA(15),L1$"470 - 345"NL2$"PLACE VALUE (THOUSANDS)"fL3$"217 + 29 + 43"{L4$"USE < OR >"L5$"NUMBER SEQUENCES"L6$"WORD PROBLEMS ( + AND - )"L7$"NOTHING"L$"LEVEL 25" NP6470  809 - TP1"&SC((TR10TP))2TRTR401:1:(14);@:(18);_DL$;:28:"SCORE...";(SC)eN}X CONTINUE OR QUITbFL1l23:(15);v" PUSH TO CONTINUE";:G$G$"@"ġ:2920FL0  NAMES OF PR"VERY GOOD "N$ "RUN HELLO"1X1N^A(X);" ";hX%r:-|20X" TO START AGAIN, PUSH ":" TO RETURN TO MENU, PUSH "16368,0PK(16384)PK141ė:180PK155Ĺ16368,0:(13);(4)"RUN HELLO"1700:12:TR1001740/20:25:"NO. TRY AGAIN."ALL1500:LLK936QYF1"P190,220,270,300,360,430,510,570,630,690,750,790,830,920,980,1040,1100,1140,1200,1240,9366:"LEVEL 20 (CAT 13)":@"STUDENT: ";N$J:T50A$(A$,J,1)MA$"A"A$"B"A$"C"A$"D"A$"Q"A$"E"1350_A$"Q"ī1580nF0NN1A$R$F0A(N)1A$R$ī152020:25:"THAT IS CORRECT.":LL1500:LL:F0CNTRCNTR5::1:"SCORE ="CNTR:34,1 CNTURNING TO MENU."%cD$;"RUN HELLO"O HELLO"@SC14ĺ"INCREDIBLY GOOD."aZTIMERTIMER1UadTIMERUPTIME2510_an3710ax BLANK SPACE FOR DIVISION BLOCKa0:L05:H4,HVL:L:COLaa END THE PROGRAMa:a12a"YOU SCORE WAS "SCa"WHICH IS ";bH4,HV8:COL:3800O`KPRESS8US$(US$,(US$)1):3960:0:H4,HV8:COLv`KPRESS8HENPTHH4:3960:3710`KPRESS83710`KPRESS48KPRESS573710`H83710`H363710` 0`H4,HV8`COL`(HH4a2Z((KPRESSR4R5R6R7TP0TP18&SC((TR100TP))2TRTRJ01:1:(14);V:(18);uDL$;:28:"SCORE...";(SC){NX CONTINUE OR QUITbFL1l23:(15);v" PUSH TO CONTINUE";:G$G$"@"ġ:2900FL0D SHE HAVE IN ALLT 0,MARY HAS,FRECKLES,ROSARIO HAS,HOW MANY MORE DOES MARY HAVE 0,THERE ARE,CHILDREN IN SCHOOL,THE NUMBER OF GIRLS IS,WHAT IS THE NUMBER OF BOYS 14 "NO...THE RIGHT ANSWER IS "C MS2  510  600  470!" 1OW MANY DID THEY FIND IN ALLi 0,ZERO BLEW UP,BALLOONS,MARSHAL BLEW UP,HOW MANY MORE DID ZERO BLOW UP 1,GREG'S DOG HAS,FLEAS,JOSE'S DOG HAS,HOW MANY FLEAS DO THEY HAVE ALTOGETHER 1,JENNY FOUND,ALUMINUM CANS,THEN ALFREDO GAVE HER,HOW MANY DIERS,KING CARLOS HAS,HOW MANY SOLDIERS DO THEY HAVE IN ALL 1,LISA READ,PAGES IN HER BOOK,LINDA READ,HOW MANY DID THEY READ ALTOGETHER? 0,KING KONG IS,FEET TALL,GODZILLA IS,HOW MUCH TALLER IS KING KONG 1,MARTHA FOUND,CLAM SHELLS,SAM FOUND,HOBRIDGE HAS,HOW MANY MORE FIREMEN DOES SF HAVEx 1,FARMER JONES HAS,COWS,FARMER SMITH HAS,HOW MANY COWS DO THEY HAVE IN ALL 0,JUAN DROVE,MILES IN TWO DAYS,ON THE FIRST DAY HE DROVE,HOW MANY DID HE DRIVE ON THE SECOND9 1,KING FELIPE HAS,SOLDI200< P6P61F QC2850gP 0,THERE WERE,FISH IN A POND,FISHERMEN CAUGHT,HOW MANY FISH ARE LEFTZ 1,JUAN HAS,PENNIES,LOLA HAS,HOW MANY PENNIES IN ALLd 0,TONY HAD,TRADING CARDS,HE GAVE AWAY,HOW MANY DOES HE HAVE NOW.n 0,SF HAS,FIREMEN,MA(J)1& I1J:K,K1$,K2$,K3$,K4$:5 K1CABE K1CABS :D6D61c D6132520x I115:A(I)0: D60 2:1:(15); (18); 4 K1$" "A" "K2$"."  K3$" "B"."  K4$"?"( 11:"ANSWER: ";2 +! LEVEL 26 10-FEB-83. L MATHEMATICS DRILLW b y APPLE II +  BY RICHARD PITCHKA  MODIFIED BY: SHAUN MC EVOY ************"GIVE THE MISSING NUMBER. ";'R2007\P5P51:14IfQX4Y2340Sp2300_zX", ";mXY", ";}X2Y", ";:" ";", "X4Y11"GIVE THE MISSING NUMBER. ";200P5P51:14QX3Y2340"NO...R12000R220108X(45(1)):X2X:Y2:2020YX((1)16):X5X:Y5:2020uX((1)6):X10X:Y10R((1)2)2:1:(15)8R12170 X;", ";XY", "; X2Y", ";*X3Y", ";4:" ":>11H