' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL]렮 鷎귭෍ᷩ췩緈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`0L [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-(f `Ϡ@跻~!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#ILoLHllLŌŒlaHŒ\LŒ\KH\HLHlaH\朻\\LŒ\\HFlHHHHCHlaClLŒ\霿gLŒ\Č,[ELOL` u` WRONG SIGN AS"::"WELL AS THE WRONG VALUE."::EF%(7)1670&"IF YOU FIX BOTH OF THESE ERRORS, THEN"::"GETTING THE LINEAR TERM WILL BE"::"THE LAST STEP."&50000:1030&EF%(6)1800&E%(6)E%(6)1'12:"YOU'RE NOT QUITE RIGHT, ";N$;MUST":J%m"HAVE DIFFERENT SIGNS: ONE POSITIVE"::"AND ONE NEGATIVE.";\%rEF%(7)1670%w" ONCE YOU CORRECT THE"::"SIGN, YOU CAN WORK ON THE LINEAR TERM.":1670=&|E%(6)E%(6)1:N$;", YOU HAVE MADE TWO MISTAKES."::"THE CONSTANT TERM HAS THE IS POSITIVE,"::"THE CONSTANT TERMS IN THE FACTORS MUST":$^"HAVE THE SAME SIGN: BOTH POSITIVE"::"OR BOTH NEGATIVE.";:1650$c12:"THAT ISN'T CORRECT, ";N$;".":%h"SINCE THE CONSTANT TERM IS NEGATIVE,"::"THE CONSTANT TERMS IN THE FACTORS EF%(7)1595Z#6"CORRECT THESE ERRORS BEFORE YOU TRY TO"::"GET THE RIGHT LINEAR TERM."k#;50000:1030}#@EF%(5)1700#EE%(5)E%(5)1#JEF%(6)1660#O(POLY%(0))11635#T12:"THAT ISN'T CORRECT, ";N$;".":<$Y"SINCE THE CONSTANT TERM%(6)E%(6)1:"IS INCORRECT.":1""EF%(7)1595;"'1590",E%(5)E%(5)1:E%(6)E%(6)1:"YOU HAVE MADE THREE ERRORS, ";N$;".": #1"THE ";:D(2)1:D(1)0:D(0)0:10000:" TERM IS WRONG, AND THE CONSTANT"::"TERM IS WRONG IN BOTH SIGN AND VALUE.":: FIX THE LINEAR TERM.";:15955!EF%(5)EF%(6)1580!"WELL, ";N$;", I SEE TWO PROBLEMS."::"FIRST, THE ";:D(2)1:D(1)0:D(0)0:10000:" TERM IS WRONG. SECOND,":!"THE CONSTANT TERM ";:EF%(5)E%(5)E%(5)1:"HAS THE WRONG SIGN."::1570"E0:D(0)0:10000:" TERM, THE PRODUCT OF THE":Y "COEFFICIENTS OF X IN THE FACTORS": M0%1ĺ"AND THE ";M0%;" WHICH YOU HAVE FACTORED OUT": "MUST BE EQUAL TO ";POLY%(2);"."; EF%(7)1595! " ONCE YOU GET THE"::"FIRST TERM, YOU CAN0:10000:" IS ";:D(2)0:D(1)R%(1):10000:", AND ":f"THE SQUARE ROOT OF ";T2%;" IS ";R%(0);"."w50000:1030EF%(4)1600E%(4)E%(4)1EF%(5)EF%(6)1550"YOU'RE A LITTLE OFF, ";N$;". TO GET":/ "THE RIGHT ";:D(2)1:D(1)PECIAL"::"METHOD FOR THIS KIND OF PROBLEM.":1499["YOU'RE CLOSE, BUT YOU HAVE THE":T1%POLY%(2):T2%POLY%(0):M0%0M0%1T1%T1%M0%:T2%T2%M0%6"WRONG FACTORS. LET ME GIVE YOU A HINT."::"THE SQUARE ROOT OF ";:D(2)T1%:D(1)0:D(0)к"THE RIGHT ANSWER."%_50000:10307xEF%(3)1500IE%(3)E%(3)1s"I'M AFRAID THAT'S WRONG, ";N$;".":MU(1)01460"IF YOU LOOK CAREFULLY, YOU'LL NOTICE"::"THAT THIS IS A DIFFERENCE OF TWO SQUARES"3"PROBLEM. YOU MUST USE A SHE PROBLEM.":1375UE%(3)E%(3)1:12:"I CAN SEE TWO MISTAKES, ";N$;"."::"YOU DIDN'T FACTOR OUT THE RIGHT COMMON"::"FACTOR, AND YOU DIDN'T USE THE PROPER"::"METHOD FOR A DIFFERENCE OF TWO SQUARES."Z:"IF YOU FIX THESE ERRORS, YOU'LL HAVE":: COMMON FACTOR.":13556A12:"NOT QUITE, ";N$;".":~F"THE TERMS OF THIS POLYNOMIAL DON'T"::"HAVE ANY COMMON FACTORS."KEF%(0)1ĺ:"FIND THE RIGHT FACTOR, AND YOU'RE DONE.":1375P:"GET THIS PART RIGHT, THEN WORRY"::"ABOUT THE REST OF T"."::M0%;" IS NOT THE LARGEST COMMON":n2"FACTOR OF ";POLY%(2);", ";POLY%(1);", AND ";POLY%(0);".":1355712:"SORRY, ";N$;"."::"YOU'VE LEFT OUT AN IMPORTANT STEP.":<"DON'T FORGET THAT ";POLY%(2);", ";POLY%(1);", AND ";POLY%(0)::"HAVE AHIS POLYNOMIAL ARE NOT"::"ALL DIVISIBLE BY ";`D(2)0:D(1)0:D(0)LF%:XF%D(1)D(0):D(0)0} 10000:".":50000:1030EF%(2)1400E%(2)E%(2)1EF%(3)1365#M0%0M0%11335(F0%0F0%11345)-12:"THAT'S NOT RIGHT, ";N$;THIS POLYNOMIAL.":50000:1030(F0%LF%(F0%LF%)XF%FX%)Ģ16:"YOU'RE ON THE RIGHT TRACK, ";N$;","::"BUT YOU DID NOT FIND THE LARGEST"::"COMMON FACTOR FOR THIS POLYNOMIAL.":50000:1030/16:"THAT'S NOT RIGHT, ";N$;"."::"THE TERMS OF TFX%XF%LF%F0%Ģ16:"VERY CLOSE, ";N$;"."::"YOU FOUND THE RIGHT COMMON FACTOR, BUT"::"YOU MADE AN ERROR IN COMPUTATION.":50000:1030LF%F0%FX%Ģ16:"YOU MADE A SMALL OVERSIGHT, ";N$;"."::"NOTICE THAT X IS ALSO A FACTOR IN EACH"::"TERM OF ;N$;"."::"I CAN'T HELP YOU ANY MORE WITHOUT"::"TELLING YOU THE ANSWER. IF YOU'RE"::"REALLY STUCK, YOU CAN ALWAYS PRESS S.":50000:20095 7uNHELP%1:"ALL RIGHT, ";:N$;"."::"TO HELP YOU, I'LL KEEP TRACK OF THE"::"PRODUCT AS YOU CHANGE THE FACTOM2%(1)1S1%S2%C1%(1)1C1%(2)1C2%(1)1C2%(2)1)Ĺ34,13:23::34,0:V%1:t5WNM$"+"M$"-"İ205005\NM$"S"M$"s"İ55000:200005aNM$"Q"M$"q"ġ:QUIT%1:19505fNM$"H"M$"h"200205kN34,15:23::34,06pNHELP%ĺ"SORRY, "21000:200204*N" ( X )( X )";:36,START%2:OK%0:M0%0:M1%(1)1:M2%(1)1:S1%0:S2%0:C1%(1)1:C1%(2)1:C2%(1)1:C2%(2)144NM$4>NM$" "İ206004CNM$(8)İ201004HNM$(21)İ202004MNM$"0"M$"9"İ20300Z5RNM$(13)(M0%M1%(1)1VE CURSOR."::10:"USE SPACEBAR TO ERASE."::17:"PRESS:"::" ";::"RETURN";::" WHEN DONE.";:22::"S";:3'N" TO SEE SOLUTION."::" ";::"H";::" FOR HELP.";:22::"Q";::" TO QUIT.";:V%1:START%13(NM$"H"M$"h"ĖSTART%3 4)NHELP%İU(1)M0%MU(1):MU(0)M0%MU(0)$2:<2 N ENTER SUBROUTINEZ2!N SET HELP% TO NON-ZEROv2"N TO DISPLAY RUNNING2#N PRODUCT.2%NV%(37):START%(36):HELP%0:14:1:"----------------------------------------";p3&N16:6:"USE ARROW KEYS TO MO: FACTORS IN,1: M1%(1-0), M2%(1-0)H1: PASS CONSTANT FACTOR`1: (IF ANY) IN M0%.z1: RESULT RETURNED IN1: MU(2-0).1:MU(2)M1%(1)M2%(1):MU(1)M1%(1)M2%(0)M1%(0)M2%(1):MU(0)M1%(0)M2%(0)2:M0%0M0%1MU(2)M0%MU(2):M0t'D(1)010200,0~'D(1)0D(2)0ĺ"+";C0'(D(1))1ĺD(1);V0'D(1)1ĺ"-";`0'"X";r0'D(0)0103000'D(0)0(D(2)0D(1)0)ĺ"+";0'D(0);0<(D(2)0D(1)0D(0)0ĺ0;0(0: MULTIPLY SUBROUTINE0: PASS COEFFICIENTS OF1:M1%(1)1:M1%(0)0'/FX%M0%150102/15000m/POLY%(2)MU(2):POLY%(1)MU(1):POLY%(0)MU(0):F0%M0%:/' DISPLAY SUBROUTINE/' PASS COEFFICIENTS OF POLY. IN/' D(2-0)/'D(2)010100/$'D(2)1ĺD(2);0.'"X";:(37):2;(10);.POLY%(2)MU(2):POLY%(1)MU(1):POLY%(0)MU(0):F0%M0%:`. CREATE A COMMON FACTOR PROBLEM..D2%0:CF%1:M0%R(9):FX%0:M1%(1)0:M1%(0)1:M2%(1)R(3):M2%(0)R(9):M2%(0)M2%(1)(M2%(0)M2%(1))5010.R(2)2M2%(0)M2%(0)/R(2)2FX%1DIVQQ(R%(0))4010+-M0%R%(1)294010d-(LC1%(M0%1R%(1)1))(LC1%M0%1R%(1)1)4010l-QQ-M1%(1)R%(1):M2%(1)R%(1):M1%(0)R%(0):M2%(0)R%(0)-QQ1P:R%(0)K1%(QQ)R%(1)K2%(QQ)4010-:K1%(P)R%(0):K2%(P)R%(1)-150009%(1)M1%(0)M2%(0))(M1%(1)1M2%(1)1M0%1)3010>, 15000y, POLY%(2)MU(2):POLY%(1)MU(1):POLY%(0)MU(0):F0%M0%:, CREATE A DIFFERENCE OF SQUARES PROBLEM.,LC1%LC1%-D2%1:CF%0:M0%1:R%(1)R(3):R%(0)R(9):QQ2R%(1):DIVQQ(R%(1))CREATE A HARD TRINOMIAL PROBLEM.|+ D2%0:CF%0:M0%1:M1%(1)R(3):M2%(1)R(3):M1%(0)R(9)SIGN(0):M2%(0)R(9)SIGN(0)+ M0%M1%(1)M2%(1)43010+ QQ29:DIVQQ(M1%(1))DIVQQ(M1%(0))DIVQQ(M2%(1))DIVQQ(M2%(0))3010+ QQ3, (M1%(1)M2INAL ERROR BREAKDOWN."*20:650K* CREATE AN EASY TRINOMIAL PROBLEM.*D2%0:CF%0:F0%0:M0%0:M1%(1)1:M2%(1)1:M1%(0)R(9)SIGN(0):M2%(0)R(9)SIGN(0):M1%(0)M2%(0)2010*15000*POLY%(2)MU(2):POLY%(1)MU(1):POLY%(0)MU(0): + )DM0%1ĺ"TIMES THE FACTOR OF ";M0%;" ";^)N"IS ";:D(2)0:D(1)POLY%(1):D(0)0:10000:"."o)X50000:1030)l16:(31(N$))2:"GOOD WORK, ";N$;".":)v13:"THAT IS CORRECT.")50000)35000: PRINT ERROR BREAKDOWN.)P*40000: FTHE LINEAR TERM LEFT."'(50000:10309(EF%(7)1900K(E%(7)E%(7)1u(12:"CLOSE, ";N$;", BUT NO CIGAR.":(&"TO GET THE LINEAR TERM TO MATCH, YOU":(0"MUST MAKE SURE THAT THE SUM OF THE":(:"PRODUCTS OF THE INNER AND OUTER TERMS":*".":4'"TO GET THE CORRECT CONSTANT TERM, THE":e'"PRODUCT OF THE CONSTANTS IN THE FACTORS":'M0%1ĺ"TIMES THE ";M0%;" YOU FACTORED OUT":'"MUST BE EQUAL TO ";POLY%(0);".";'EF%(7)1790(" FIX THIS TERM,"::"AND YOU JUST HAVE 2350,22390F!W22390#F%WM$"0"ı@F&WC1%(1)(M$):M$;:22380XF/WM$"0"C1%(1)1ıF0WXF%0:C1%(2)(M$):M$;"(";:22380F9WM$"0"ıF:WM2%(1)(M$):M$"1"ĺ" X";:22380F?WM$;"X";:22380FDWC2%(1)(M$):M$;:22380GNWC2%(2)(M$):M$;(8);,22110,22110EYV22190)E^V36,(36)1:;EhV36,(36)2:AEVEV(36)START%122210,22220,22210,22220,22210,22210,22210,22290,22290EV22290EV36,(36)1:EV36,(36)2:EW FW(36)START%122309,22319,22390,22329,22390,22390,22340,2ACTORS.":50000DJV34,15:23::34,0:"I WON'T TELL YOU IF YOU'RE RIGHT OR"::"WRONG, AND MISTAKES WON'T COUNT AGAINST"::"YOU UNTIL YOU FINISH WORKING.":50000DOV34,15:23::34,0:22006 ETV(36)START%122190,22110,22110,22120,22110,22120,22110Y, ";N$;"."::"I CAN'T HELP YOU ANY MORE WITHOUT"::"TELLING YOU THE ANSWER. IF YOU'RE"::"REALLY STUCK, YOU CAN ALWAYS PRESS S.":50000:22095DEVHELP%1:"ALL RIGHT, ";:N$;"."::"TO HELP YOU, I'LL KEEP TRACK OF THE"::"PRODUCT AS YOU CHANGE THE F(M0%M2%(1)1XF%S2%C1%(1)1C1%(2)1C2%(1)1C2%(2)1)Ĺ34,13:23::34,0:V%1:xB'VM$"+"M$"-"İ22500B,VM$"S"M$"s"İ55000:22000B1VM$"Q"M$"q"ġ:QUIT%1:1950B6VM$"H"M$"h"22020B;V34,15:23::34,0C@VHELP%ĺ"SORRLP%İ23000:22020wAU" ( X )";:36,START%:OK%0:M0%0:M2%(1)1:S2%0:XF%0:C1%(1)1:C1%(2)1:C2%(1)1:C2%(2)1AVM$AVM$" "İ22600AVM$(8)İ22100AVM$(21)İ22200AVM$"0"M$"9"İ22300AVM$"X"M$"x"İ22700^B"VM$(13);:6:16:"USE ARROW KEYS TO MOVE CURSOR"@U:10:"USE SPACEBAR TO ERASE."::17:"PRESS:"::" ";::"RETURN";::" WHEN DONE.";:22::"S";::" TO SEE SOLUTION."@U:" ";::"H";::" FOR HELP.";:22::"Q";::" TO QUIT.";:V%1:START%1AUHEM1%(0)M1%(0)S1%:M2%(0)M2%(0)S2%.?R15000&RM1%(0)10C1%(1)C1%(2)Z>:RC2%(2)1M2%(0)C2%(1):21100~>DRC2%(1)1M2%(0)C2%(2):21100>NRM2%(0)10C2%(1)C2%(2)>lRM1%(1)0S1%0M2%(1)0S2%0(C1%(1)1C1%(2)1)(C2%(1)1C2%(2)1)OK%0:>vROK%1#?R5=PC2%(2)1:" ";(8);>=P21000: DIGEST NEW INFORMATIOND=Pn=R CHECK TO SEE THAT FACTORS ARE GOOD.= RHELP%T1%(36):T2%(37):T2%:36,START%15:10):T2%1:36,START%15:21);:36,T1%:37,T2%=RC1%(2)1M1%(0)C1%(1):21050>RC1%(699,20660,20699,20670,20680,20690,206992<}P20699Jb(M1%(0));:(M1%(0))10ĺ" ";%(0)10C2%(1)C2%(2)4K2ZLF%M1%(0):XF%LF%M1%(1)fK"A SOLUTION."fH50000fFC1N1%:M1%(1)FA%(1,FC,0):M2%(1)FA%(1,FC,1)fSC1N0%:M1%(0)FA%(0,SC,0):M2%(0)FA%(0,SC,1) gRE%(0)0M2%(0) BOTH BE":&eRE%(1)0ĺ"POSITIVE."AeRE%(1)0ĺ"NEGATIVE."Se50000:58400}e"SINCE THE LAST TERM IS NEGATIVE,":e"THE CONSTANTS IN THE FACTORS MUST":e"HAVE DIFFERENT SIGNS, ONE POSITIVE":e"AND ONE NEGATIVE."e50000 f 34(RE%(0)TF)1dfߢ8N0%:25:TF;6);(RE%(0)TF);9dp߂TFTd16:1:RE%(0)058100d"SINCE THE LAST TERM IS POSITIVE AND":d"THE LINEAR TERM IS ";:RE%(1)0ĺ"ALSO POSITIVE";:58040d"NEGATIVE"; e", THE"::"CONSTANTS IN THE FACTORS MUST%(2)TF)TFTFRE%(2)57160Pc N1%N1%1:FA%(1,N1%,0)TF:FA%(1,N1%,1)RE%(2)TFjc*ߢ8N1%:6:TF1ĺTF;c4ߺTF1);"X";5);:TFRE%(2)ĺRE%(2)TF;c>ߺ"X";cH߭RE%(0)TF(RE%(0)TF)TFTF(RE%(0))57200 dRN0%N0%1:FA%(0,N0%,0)TF:FA%(0,N0%,1)(0)R%(0)b۰50000:59000Mb޺"TO BEGIN, LIST THE FACTORS OF THE FIRST":|b޺"AND LAST TERMS, IGNORING THE SIGNS."::bް50000:34,5::34,0bޢ7:9:D(2)RE%(2):D(1)0:D(0)0:10000:29:(RE%(0))bN1%0:N0%0b ߁TF19c߭RE%(2)TF(REa.ۺ"X, AND":Ga8ۺ"THE SQUARE ROOT OF ";RE%(0);" IS ";R%(0);"."::saBۺ"THIS TELLS US THAT THE FACTORS ARE":aLۺ"(";:R%(1)1ĺR%(1);aVۺ"X+";R%(0);") AND (";:R%(1)1ĺR%(1);a`ۺ"X-";R%(0);")." bM1%(1)R%(1):M2%(1)R%(1):M1%(0)R%(0):M2%RE ROOTS OF THE":A`ں"FIRST AND LAST TERMS, THEN ONE FACTOR":p`ں"WILL BE THE SUM OF THE ROOTS, AND THE":`ۺ"OTHER FACTOR WILL BE THEIR DIFFERENCE.":50000`۹34,5::34,0:7`$D(0)0:"THE SQUARE ROOT OF ";:10000:" IS ";:R%(1)1ĺR%(1);-----";3_\ڹ34,5::34,0:7::"RESULT"::10:8:C_ڭD2%57000_ځZZ02:D(ZZ)RE%(ZZ):ZZ:"WE SEE THAT ";:10000:" IS THE DIFFERENCE":_ں"OF TWO SQUARES. THIS MEANS THAT WE":_ں"CAN USE A SPECIAL TECHNIQUE.":`ں:"IF WE TAKE THE SQUALY%(1):10000:")."^ٰ55800:D(2)0:D(1)POLY%(2):D(0)POLY%(1):"X(";:10000:") = ";:ZZ02:D(ZZ)POLY%(ZZ)::10000:59030_ٰ50000::"PROBLEM #"P:3::"FACTOR"::ZZ02:D(ZZ)POLY%(ZZ):ZZ:3:15:10000:::"-----------------------------------E IS NO CONSTANT WHICH IS A FACTOR":V]ٺ"OF BOTH TERMS. HOWEVER, BOTH TERMS ARE":]ٺ"DIVISIBLE BY X. TO FACTOR THIS ":]ٺ"EXPRESSION, WE SIMPLY FACTOR OUT AN X."::^فZZ02:D(ZZ)POLY%(ZZ):ZZ:10000:" = X(";:D(2)0:D(1)POLY%(2):D(0)PO:D(ZZ)POLY%(ZZ):ZZ:10000:" = ";F0%;"X(";:D(2)0:D(1)RE%(2):D(0)RE%(1):10000:")."\ٰ55800:D(2)0:D(1)RE%(2):D(0)RE%(1):F0%"X(";:10000:") = ";:ZZ02:D(ZZ)POLY%(ZZ):ZZ:10000:59030\ٺ"LOOKING AT THIS BINOMIAL, WE SEE THAT":%]ٺ"THER10000:") = ";:ZZ02:D(ZZ)POLY%(ZZ):ZZ:10000:59030_[غ"THERE IS ONLY ONE STEP LEFT.":[غ"EACH TERM IN THE POLYNOMIAL HAS":[غ"AN X IN IT. SO WE MUST ALSO":[غ"FACTOR OUT AN X. WHEN WE DO, WE GET":[غ"THIS RESULT:"::X\؁ZZ02------------------------")Z׭CF%560008Z׭FX%55500jZ׺"NOW THAT WE HAVE FACTORED OUT A ";F0%;",":Z׺"THE POLYNOMIAL CANNOT BE FURTHER":Z׺"SIMPLIFIED. THE POLYNOMIAL IS FULLY":Z׺"FACTORED.":558009[ׁZZ02:D(ZZ)RE%(ZZ)::F0%"(";: ";:ZZ02:D(ZZ)RE%(ZZ):ZZ:10000:" ).":[Yn״FX%55160:"NOW WE CONTINUE FACTORING."Yxװ50000::"PROBLEM #"P:3::"FACTOR"::3:10:ZZ02:D(ZZ)POLY%(ZZ):ZZ:10000ZׁZZ02:D(ZZ)RE%(ZZ):ZZ:" = ";F0%;"(";:10000:")"::"----------------):ZZ:F0%0F0%1M0%1:56000KXFׁZZ02:RE%(ZZ)RE%(ZZ)F0%:ZZ:M0%F0%~XP׺"FIRST, WE NOTICE THAT ";F0%;" IS A FACTOR":XZ׺"OF EACH TERM OF THE POLYNOMIAL."::"THEREFORE, WE CAN SIMPLIFY ";:ZZ02:D(ZZ)POLY%(ZZ):ZZ:10000:" AS":-Yd׺F0%;" (ֺ"I'M GOING TO SHOW YOU HOW TO FACTOR":KWֺ"THIS POLYNOMIAL.":50000:Wח:"PROBLEM #"P:3::"FACTOR"::ZZ02:D(ZZ)POLY%(ZZ):ZZ:3:15:10000:::"----------------------------------------"W ׭CF%FX%F0%255700X<ׁZZ02:RE%(ZZ)POLY%(ZZ`~_{/Uz`Ğ`7:"DO YOU WISH TO REVIEW THE"::7:"INSTRUCTIONS (Y OR N)? ";:G$""htG$:G$"Y"G$"y"ĺG$:60000tG$"N"G$"n"60810:700t:ZZ769:N$""tI(ZZ):I060800:N$N$(I):ZZZZ1:60910P7:9:N$",":10:8:"WOULD YOU LIKE TO TRY A"::8:"SAMPLE PROBLEM (Y OR N)? ";:16368,0s5G$:G$"N"G$"n"G$"Y"G$"y"60725:G$"N"G$"n"60800s:"Y";:16151,0:I1(N$):768I,((N$,I,1))::768I,0:(13)(4)"RUN SAMPLE"Ft:10: OF PROBLEMS, I ":"WILL GIVE YOU A TOTAL ERROR ANALYSIS."Jr50000:r8:"IF YOU WISH TO STOP BEFORE YOU FINISH ":"ALL THE PROBLEMS, PRESS THE ";::"Q";::" KEY TO"::"QUIT ";r!"AND GO TO THE TOTAL ERROR"::"ANALYSIS."r&50000:\s0 ":"FEATURES.jqw10:"REMEMBER:":14:4::"H";::" FOR HELP TO KEEP TRACK OF FACTORS.":17:4::"S";q|:" FOR SOLUTION TO PROBLEM.":50000:=r5:"AFTER EACH PROBLEM, I WILL GIVE YOU A ":"SUMMARY OF YOUR ERRORS.":12:"WHEN YOU FINISH A SETNGE THE FACTORS.p^14:"IF YOU CANNOT SOLVE A PROBLEM, PRESS"::"THE ";::"S";::" KEY. I WILL THEN SHOW YOU HOW TO"::"FACTOR THE POLYNOMIAL."ph50000:qr2:"ASKING FOR HELP DOES NOT COUNT AGAINST ":"YOU. DON'T BE AFRAID TO USE THESE RIGHT, I WILL TELL YOU SO.":15:"IF YOU ARE WRONG, I WILL POINT OUT YOUR ":"MISTAKE AND GIVE YOU ANOTHER CHANCE."o,50000:pT5:"IF YOU NEED HELP, PRESS THE ";::"H";::" KEY.":8:"I WILL HELP YOU BY KEEPING TRACK OF THE ":"PRODUCT AS YOU CHAERS."n50000:n9:"IF YOU MAKE A MISTAKE, MOVE THE CURSOR ":"OVER THE ERROR, ERASE IT WITH THE SPACE ":"BAR, AND ENTER THE CORRECTION."n50000:n5:"WHEN YOU FINISH FACTORING, PRESS THE "::"RETURN";::" KEY."to11:"IF YOU AREE WILL BE A WORK AREA WHERE YOU WILL":"ENTER THE FACTORS."HmP50000:n7:"WHEN YOU START, EACH SET OF PARENTHESES ":"WILL CONTAIN AN "(34)"X."(34):13:"USING THE ARROW KEYS TO MOVE THE CURSOR,":"ENTER THE APPROPRIATE NUMBERS, SIGNS, OR":"LETTERENCE OF TWO SQUARES">l17:4:"4. COMMON FACTOR PROBLEMS"l 20:"YOU MAY CHOOSE ANY OF THESE TYPES OR YOU":"MAY MIX THEM."l50000::9l("FOR EACH PROBLEM, THE COMPUTER WILL":l2"DISPLAY THE POLYNOMIAL YOU WILL FACTOR.":;m<15:"THERW FOUR KINDS OF PROBLEMS: "`k4:4:"1. EASY QUADRATIC TRINOMIALS":6:7:"(COEFFICIENT OF ";kD(2)1:D(1)0:D(0)0:10000:" IS 1)":9:4:"2. HARD QUADRATIC TRINOMIALS"k11:7:"(COEFFICIENT OF ";:10000:" IS MORE THAN 1)"l14:4:"3. DIFFMPLETE THE PREMATURELY EXITED FOR LOOPS TO AVOID PROBLEMS WITH RETURN.Qj(59000fjx34,5::34,0:7xj:"RESULT":j10:6:25000j50000:34,5::34,0j7::"WORK SPACE":::4jCF%Ė11jj` PRINT INSTRUCTIONSjk"I KNO)POLY%(0)MU(0)58900*iRE%(0)058700Li$M1%(0)M1%(0):M2%(0)M2%(0)i.34,14::34,0:16:4:25000:50000:POLY%(2)MU(2)POLY%(1)MU(1)POLY%(0)MU(0)58900iLSC:FCi20:15::"THAT'S IT!"::50000FjSC12:SC:FC12:FC: MUST CO(2)POLY%(1)MU(1)POLY%(0)MU(0)58900@hM1%(1)M2%(1)58700jhM1%(0)FA%(0,SC,1):M2%(0)FA%(0,SC,0)hRE%(0)0M2%(0)M2%(0):58640hRE%(1)0M1%(0)M1%(0):M2%(0)M2%(0)i34,14::34,0:16:4:25000:50000:POLY%(2)MU(2)POLY%(1)MU(1M2%(0):585409gRE%(1)0M1%(0)M1%(0):M2%(0)M2%(0)g34,14::34,0:16:4:25000:50000:POLY%(2)MU(2)POLY%(1)MU(1)POLY%(0)MU(0)58900gRE%(0)058600gM1%(0)M1%(0):M2%(0)M2%(0)'h34,14::34,0:16:4:25000:50000:POLY%(2)MU--";:``U~UcU~----(*A*@ T  ``}ǟĈq`W*]jU~(*A*@ T 0`|L?xC3@~ F`ծ`p`d`*]jWD0`0Na f03@ g0D*A T  `ծ``ϼѿ|`/}zD0`0Oaf~3@LgD*A T  `׾`~o}ת}(1,1)0:P%(1,2)1:P%(2,1)1:P%(2,2)3:P%(3,1)2:P%(3,2)7:(16);]ZZ770790:X%:ZZ,X%:ZZ:173,48,192,136,208,5,206,1,3,240,9,202,208,245,174,0,3,76,2,3,96]WH(X)(X(X)).0001]R(X)(X(1)1)]SIGN(X)32R(2)^ PI3.1415926G$:G$"8"1000:G$;:230:14:13:"7";:19:1:"8 - 1 = ";\\G$:G$"7"1010:G$;:230\12:35:"7";:14:1:39):(16);"That's it, "N$"!"::"You have found three points to plot.":20A]A%1:B%4:C%1:Z1%1:MG%1:SS%154:TC%11:2999,255:P%G$"4"960:G$;:230:14:13:"3";:19:1:"4 - 1 = ";U[G$:G$"3"970:G$;:230[10:35:"3";:14:13:"2";:(16);"Enter the x coordinate: ";[G$:G$"2"990:G$;:230:12:5:"2";:14:"y = (4)(2)-1";:14:13:"8";:(16);"4 * 2 = ";<\= ";ZG$:G$"-"920:G$;RZG$:G$"1"930:G$;:230:8:34:"-1";:14:13Z"1 and press . ":(16);"Enter the x coordinate: ";ZG$:G$"1"950:G$;:230:10:5:"1";:14:"y = (4)(1)-1";:14:13:"4";:(16);"4 * 1 = ";6[G$:LYp14:8:"Type 0 and press .";:(16);"Enter the x coordinate: ";kYzG$:G$"0"890:G$;:230Y8:5:"0";:14:"y = (4)(0)-1";:14:13:"0";:(16);"4 * 0 = ";ZG$:G$"0"910:G$;:230:14:13:"-1 and press .":19:"0 - 1 _";(1);1;:34,15:" Now we must find three points on the"::"line represented by this equation. All"::"points must be integers and between"Xf:"-10 and 10.":20:(16):34,16:" To help you out, I will tell you"::"what points to choose.":20quation"::"for y. Your done with the first step.":20nWH34,3:(16):6:5:"x";:14:"y = 4x-1";:35:"y"WR14,49266,49:14,51266,51:56,4056,98:58,4058,98:210,40210,98:212,40212,98X\15:(1);2;"_______________________________________"x"G$"X"790:"x";:230fV 10:22:"4x+(2)/(-2) ":15:13:"-1";:19:1:20);:1:"(2)/(-2) = ";V*G$:G$"-"810:G$;V4G$:G$"1"820:G$;:2307W>10:22:"4x-1 ":34,12:(16);"Nice going, "N$"."::"You have solved the original eype y and press ."::"________________________________________":"(-2y)/(-2) = ";UG$:G$"y"G$"Y"760:"y";:230U10:9:" y";:15:13:"4x and press .":19:"(-8x)/(-2) = "(8);U G$:G$"4"780:G$;VG$:G$__________________________":"Divide both sides by: ";OTG$:G$"-"720:G$;nTG$:G$"2"730:G$;:230T(16):10:9:"(-2y)/(-2) = (-8x+2)/(-2)"::34,11:(16):"Now we must perform the division, term"::"by term.":20YU(16):15:8:"T(16);:16:"-2y = -8x+2"::"Now we must set the coefficient of y"::"equal to one.":15:"Let's use division. Press <4>.":210SG$:G$"4"700:G$;5T34,9:(16):"We must divide by -2.":15:8:"Type -2 and press .":17:"______________6);:11:"8x-8x-2y = -8x+2":9:"Now you must simplify the equation by"::"combining any like terms.":15:8:"Type 0 and press ."R17:"________________________________________":"8x - 8x = ";:G$""RG$:G$"0"680:G$;:230S34,7:e y term, we will"::"subtract 8x from both sides.":15:8:"Type 8x and press .":17:"________________________________________":"Subtract from both sides: ";:G$""QG$:G$"8"640:G$;:G$""QG$:G$"X"G$"x"650:"x";:230R(1_____________________"kPX10:4:"The first step in graphing this"::"equation is to solve it for y.":20Pb34,2:(16);::14:"8x-2y = 2":15:"Let's use subtraction. Press <2>.":210PlG$:G$"2"620:G$;:34,5:(16)Qv:" To isolate tha good try."8ME$(5)"You almost made it on that one."eME$(6)"These problems are not so easy."ME$(7)"Keep trying, "N$". You'll get it."͈ME$(8)"Don't be discouraged. You'll get better."ӈñCll get better."Pñ"ñ2,(V%256):LOC%LOC%3:0(Restore variables.>2LOC%3000փ<41500:A%V%:41500:B%V%:41500:C%V%:41500:E1%V%:41500:E2%V%:41500:E3%V%:41500:E4%V%:41500:P%V%:41500:N%V%:41500:K%V%:41500:TY%V% A41500:E5%V%:41500:E6%V%:41500:Eis."N20:580kN(16):10:" Would you like to review the"::" instructions (Y or N)? ";:G$""NG$:G$"Y"G$"y"ĺ"Y";:240NG$"n"G$"N"530N&"N";N0(16):12:(30(N$))2:"Good luck, ";N$;"." O:5140:2999,128:(4);"wing the":"line through them. That line is the"::"graph of the equation."TM20M(16):5:"After each problem, I will give you a"::"summary of your errors."N10:"When you finish a set of problems, I"::"will give you a total error analysper." L20L(16):3:"If you make a mistake plotting a point,"::"I will help you. You will be able to"::"choose between sound clues and silent"::"clues."LM15:"When you have plotted all three points,"::"I will finish the problem by dra(9);"I";(14);" moves the cursor up."::5);(9);"J";(14);" moves the cursor left."::5);(9);"K";(14);" moves the cursor right."::5);(9);"M";(14);" moves the cursor down."L19:"In case you forget, there is a chart"::"next to the graph pa;(14);"."J20J(16);"To move the cursor, use the ";(9);"I";(14);", ";(9);"J";(14);", ";(9);"K";(14);","::"and ";(9);"M";(14);" keys. If you find these keys and"::"notice their positions, it will make"J:"sense that:":K5); is to plot them."I|7:"I will show you a piece of graph paper."::"At the center of the paper, you will see":"a flashing X, called the cursor." J15:"To plot a point, just move the cursor"::"to the correct location, and press"::(9);"RETURN"nd the corresponding"::"y-value."H^14:"Be sure that the x and y values are"::"integers and between -10 and 10 so that"::"the coordinate can be plotted on our"::"graph."Hh20Ir(16);"When you have chosen three points, your"::"last stepou will solve for x instead of y.")G@20GJ(16);"When the equation is in the proper form,":"you must find three pairs of coordinates":"in order to plot them on the line. For""HT7:"each pair, you will choose the x value."::"I will help you fiblem, I"::"will print the equation at the top of"::"the screen."F,9:"If the equation is not in the form"::"y=mx+b, you will have to solve for y."!G615:"In a few problems, y may not appear in"::"the equation. In these special cases,"::"ytypes of problems. The"::"easier equations are in the form y=mx+b.":"The harder equations are in other forms."E13:"You may choose either type, or you may"::"select a mixture of the two types."E20CF"(16);"When you begin working on a pro1) Add same value to both sides":"2) Subtract same value from both sides"D"3) Multiply both sides by same value":"4) Divide both sides by same value";:19:20:DG$:G$(13)230:DInstructionsD(16);"Hi, ";N$;"!"qE5:"I know two 0:E8%V%:200:QT%V%ICN$"":L%(LOC%):ZZ1L%:N$N$((LOC%ZZ)):ZZTCLOC%0ZCCV%((LOC%)1)((LOC%1)256(LOC%2)):LOC%LOC%3:ID17:1:(1);2;"________________________________________";(1);1:(9)"Enter your choice:";(14)::"56(V%256):LOC%2,(V%256):LOC%LOC%3:CBRestore variables.QBLOC%3000B200:A%V%:200:B%V%:200:C%V%:200:E1%V%:200:E2%V%:200:E3%V%:200:E4%V%:200:P%V%:200:N%V%:200:K%V%:200:TY%V%C200:E5%V%:200:E6%V%:200:E7%V%:20%E1%:120:V%E2%:120:V%E3%:120:V%E4%:120:V%P%:120:V%N%:120:V%K%:120:V%TY%:120AZV%E5%:120:V%E6%:120:V%E7%:120:V%E8%:120:V%QT%:120AdLOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZAn+BxLOC%,1(V%):V%(V%):LOC%1,V%2N1@ 130:2403@ WAIT FOR USER TO HIT RETURN.h@16368,0:24:9:"Press RETURN to continue.";@(ZZ(1):ZZ(16384):ZZ14140@+#1@216368,0:24:7:30);:@<Store variables.@FLOC%3000ZAPV%A%:120:V%B%:120:V%C%:120:VRC%(0)C%:$PòInitialize messages.JZME$(0)"Very impressive, "N$"."~dME$(1)"I see you've been doing your homework."nME$(2)"Too bad your teacher can't see this."܇xME$(3)"Well, we can't all be perfect." ME$(4)"Okay "N$", that was S$:CO%(0)S%(0):CO%(1)S%(1):19000:RE$:15000:E4%E4%1:28620mFpMT28710,28720,28730,28740,28750,28760F&pLX%(0)S%(0):LX%(1)S%(1):28790F0pLY%(0)S%(0):LY%(1)S%(1):28790F:pLC%(0)S%(0):LC%(1)S%(1):28790GDpRX%(0)S%(0):RX%(1)S%(1):2879C%(1)1(B%)246140m(ZZ(B%)21:WH(RX%(0)ZZ)WH(RX%(1)ZZ)RX%(0)RX%(0)ZZ:RX%(1)RX%(1)ZZu2ZZ: ";w[G$:G$"2"990:G$;:12:5:"2";:14:"y = (4)(2)-1";:(16);"4 * 2 = ":24:13:"Press <8>: ";[G$:G$"8"1000:G$;:19:1:"8 - 1 = ":24:35);:13:"Press <7>: ";[G$:G$"7"1010:G$;a\12:35:"7";:14:1:39):G$:G$"1"950:G$;:10:5:"1";:14:"y = (4)(1)-1";:(16);"4 * 1 = ":24:13:"Press <4>: ";ZG$:G$"4"960:G$;:19:1:"4 - 1 = ":24:35);:13:"Press <3>: ";ZG$:G$"3"970:G$;[10:35:"3";:(16);"Enter the x coordinate: ":24:(16);"4 * 0 = ":24:13:"Press <0>: ";rYG$:G$"0"910:G$;:19:1:"0 - 1 = ":24:35);:13:"Type <-1>: ";YG$:G$"-"920:G$;YG$:G$"1"930:G$;:8:34:"-1";Y(16);"Enter the x coordinate: ":24:35);:13:"Press <1>: ";_Z integers between"Xf:"-10 and 10.":20:(16):34,16:" To help you out, I will tell you"::"what points to choose.":20Xp(16);"Enter the x coordinate: ":24:13:"Press <0>: ";XzG$:G$"0"890:G$;&Y8:5:"0";:14:"y = (4)(0)-1";:66,49:14,51266,51:56,4056,98:58,4058,98:210,40210,98:212,40212,98X\15:(1);2;"________________________________________";(1);1;:34,15:" Now we must find three points on the"::"line represented by this equation. All"::"points must be"810:G$;#V4G$:G$"1"820:G$;V>10:22:"4x-1 ":34,12:(16);"Nice going, "N$"."::"We have solved the original equation"::"for y. We're done with the first step.":20VH34,3:(16):6:5:"x";:14:"y = 4x-1";:35:"y"JWR14,492:" y";:17:1:"(-8x)/(-2) = "(8);:24:1:35);:13:"Type <4x>: ";hU G$:G$"4"780:G$;UG$:G$"x"G$"X"790:"x";U 10:22:"4x+(2)/(-2) ":24:35);:13:"Type <-1>: ";:17:1:20);:1:"(2)/(-2) = ";:24:22 V*G$:G$"-10:9:"(-2y)/(-2) = (-8x+2)/(-2)"::34,11:(16):"Now we must perform the division, term"::"by term.":20T(16):15:"________________________________________":"(-2y)/(-2) = ":24:13:"Press : ";TG$:G$"y"G$"Y"760:"y";NU10:9 division. Press <4>: ";2SG$:G$"4"700:G$;S34,9:(16):"We must divide by -2.":15:"________________________________________":"Divide both sides by: ":24:13:"Type <-2>: ";SG$:G$"-"720:G$;SG$:G$"2"730:G$;mT(16):ike terms."kR15:"________________________________________":"8x - 8x = ";:24:13:"Press <0>: ";:G$""RG$:G$"0"680:G$;S34,7:(16);:16:"-2y = -8x+2"::"Now we must set the coefficient of y"::"equal to one.":210:24:1:"Let's use_____________________________":"Subtract from both sides: ":13:24:"Type <8x>: ";:G$""yQG$:G$"8"640:G$;:G$""QG$:G$"X"G$"x"650:"x"; R(16);:11:"8x-8x-2y = -8x+2":9:"Now we must simplify the equation by"::"combining any luation is to solve it for y.":20yPb34,2:(16);::14:"8x-2y = 2":210:24:1:"Let's use subtraction. Press <2>: ";PlG$:G$"2"620:G$;:34,5:(16)YQv:" To isolate the y term, we will"::"subtract 8x from both sides.":15:"___________blem (Y or N)? ";:G$""7OFG$:G$"N"G$"n"ĺ"N":520UOHG$"Y"G$"y"582:"Y"ON(16);"Graph:";:14:"8x-2y = 2":1:1:(15);(15);"_____"(26):2:"________________________________________" PX10:4:"The first step in graphing this"::"eqD 0f0XMaxcsOlfA `׿ժu`z/j+Uj`虢`D 0o0xLa `3X0.100$'ZZ(Z):ZZ;".";5.'ZZZZZ:(ZZ10.0001);b8'ZZZZ((ZZ10.0001)10):(ZZ100.1);hB'2Clear bottom of screen.221:1:(6);:6Write an ordered pair.6Pass coordinates in6DX% and DY%.6"(";DX%;",";DY%;")";:00:37:E5%E6%E7%E8%"15000(16):12:(32(N$))2:"Bye now, ";N$;"."::3:"I hope you enjoyed working with me."(:9:"To run again, type ";(9);"PR#6";(14);"."2'Display a real number to two decimal places.'Z(Z100.5)11:"Selecting Points ........ ";:ZE6%P%:10000:37:E6%}13:"Plotting Points ......... ";:ZE7%P%:10000:37:E7%15:"Calculation Errors ...... ";:ZE8%P%:10000:37:E8%19:"Total ................... ";:Z(E5%E6%E7%E8%)P%:1005);(15);"___________________";(15);(16)3:26:"Average":4:28:"per":5:8:"Error";:26:"Problem";:35:"Total";:8:(15);(15);"_____";:26:"_______";:35:"_____";(15);(16)9:"Solving for a Variable .. ";:ZE5%P%:10000:37:E5%=TY%1İ15000:4:1:(6);:25000/40000}15000:3:(6);:12:12:"One moment, please.":(4);"RUN GRAPHING.REST"L41000:P%P%1:P%N%QT%1200V1000Final Error Summary.P%P%1*(16);10);"Total Error Summary";:11:(1s to solve it for y.":SV$"y":1040 B%0ĺ" Well, ";N$;", this problem is an"::"unusual one. Normally, you would solve"::"the original equation for y; but y"::"doesn't appear in this equation, so you"::"must solve for x instead.":SV$"x"$)9900 N%(NU$) P%1t 45000:46000:(16);:20000:1:1:"Graph:";:1:(15);(15);"_____";(15);(16) 2:(1);2;"________________________________________";(1);1# 10:TY%1B%0ĺ" The first step in graphing this"::"equation if the above: ";:"";NU$) 4(NU$)3810P >(NU$)1(NU$)2(NU$)3810^ HK%(NU$) (16):3:"Enter the number and hit ";(9);"RETURN";(14);".":1:"How many problems (1 to 9)? ";NU$ (NU$)3900 (NU$)((NU$))(NU$)1(NU$2:"One moment, please.":(4);"RUN GRAPHING.INSTRUCTIONS"E 41000 (16):"Hi, ";N$;".":5:"What kind of problems do you want?":9:"1) Easier (in the form y=mx+b)":11:"2) Harder (other forms)":13:"3) Mixed problems" *17:(6);"Enter one o99)01100 50000> (4);"BLOAD SHAPES":232,32:233,3I 51000y (16);"Do you want instructions (Y or N)?" 16368,0 ZZ(1):ZZ(16384)128:ZZ78ZZ110ZZ89ZZ121710 16368,0:ZZ78ZZ110800: 40000:(16):12:1v 768,0:769,0V:10:16:"LOADING":12:5:"FACTORING ALGEBRAIC EXPRESSIONS"t(13)(4)"RUN FACTORING" G0E%(2)E%(2)1LF%1XF%ĺ"YOU'RE NOT BEING CAREFUL, ";N$;"."::"DON'T FORGET THAT THE TERMS OF THIS"::"BINOMIAL HAVE A COMMON FACTOR."::"ONCE YOU REMOVE THAT FACTOR, YOU'LL BE":LF%1XF%ĺ"DONE WITH THIS PROBLEM.":50000:1030)0:QQ17:EF%(0)EF%(0)EF%(QQ):QQ7LEF%(1)1200IVE%(1)E%(1)1e`16:"SORRY, ";N$;".":j"ANY FACTOR MUST HAVE THE FORM AX+B,":t"WHERE A AND B ARE INTEGERS.":~50000:1030CF%1300EF%(0)EF%(2)0FX%XF%LF%F0%190;:1000012:1EF%(1)OK%:EF%(2)(F0%0M0%1F0%1M0%0F0%M0%):EF%(3)D2%(POLY%(2)MU(2)POLY%(1)MU(1)POLY%(0)MU(0)):EF%(4)POLY%(2)MU(2)$EF%(5)(POLY%(0))(MU(0)):EF%(6)(POLY%(0))(MU(0)):EF%(7)POLY%(1)MU(1)%)EF%(0----------------------------------------"?34,6:10::34,0Z 7::"WORK SPACE"::CF%Ė11:22000:HELP%OK%D(2)MU(2):D(1)MU(1):D(0)MU(0):20:" = ";:10000:1050CF%Ė4:20000:HELP%OK%D(2)MU(2):D(1)MU(1):D(0)MU(0):19:" = "%(QQ)0:QQ:TE%0( DO N% PROBLEMS.QP1N%:QQ17:E%(QQ)0:QQ:QUIT%0T%2000,3000,4000,5000:T%5ĴR(5)2000,3000,3000,4000,5000:"PROBLEM #"P:::"FACTOR":D(2)POLY%(2):D(1)POLY%(1):D(0)POLY%(0):3:15:10000)1:4:"$):QQ0765 N%0QQ5780-QQ67806G$;SQQ1QQ6QQ6N%0780dQQ6T%QQtQQ645000 :4:N$","::"YOU MAY TRY UP TO 9 PROBLEMS."::"HOW MANY WOULD YOU LIKE? ";:G$""*G$:N%(G$):N%08104G$;HQQ17:TE EASY QUADRATIC TRINOMIALS":F4:"2. HARD QUADRATIC TRINOMIALS":o4:"3. DIFFERENCE OF TWO SQUARES":4:"4. COMMON FACTOR":4:"5. MIXED PROBLEMS":N%0Ė4:"6. EXIT PROGRAM"20:8:"YOUR SELECTION: ";:G$""  G$:QQ(G:::13:"DO YOU WANT INSTRUCTIONS (Y OR N)? ";:G$""{G$:XX((78)(79))16:XX(XX):G$"Y"G$"y"ī60000:700G$"N"G$"n"670G$;:3:QQ19:K1%(QQ)0:K2%(QQ)0:"WHAT KIND OF PROBLEMS DO YOU WANT?":::4:"1.0lZH90G$(ZH32)7qN$N$G$:G$;:ZZZZ1:610EvZZ0610ax(8)" "(8);:ZZ1608{N$(N$,(N$)1):ZZZZ1:610:3:"HI, "N$"!"::"THIS PROGRAM WILL HELP YOU PRACTICE"::"FACTORING DIFFERENT KINDS OF ALGEBRAIC"::"EXPRESSIONS."E.o ]:3:" PLEASE ENTER YOUR FIRST NAME (UP TO"::" TEN LETTERS) AND PRESS .":::10)"NAME: "; `ZZ0:N$"":G$"":ZH0 bG$:G$(8)610:ZH(G$):ZH13ZZ0650 dZH8630 gZZ10610 iZH65ZH122610jZH90ZH9761;::2 7:6:"FACTORING ALGEBRAIC EXPRESSIONS"` 10:6:"BY MARK BERMAN AND KEVIN VESSIO" 12:11:"DESIGNED BY DON ROSS" 15:9:"MICROCOMPUTER WORKSHOPS"::15:"COURSEWARE" :16:"(C) 1984" &30000:30000 X GET STUDENT'S NAM6)"THESE PROBLEMS ARE NOT SO EASY."N ME$(7)"KEEP TRYING. YOU'LL GET IT." ME$(8)"DON'T BE DISCOURAGED. YOU'LL DO BETTER." (769)060900  PRINT A TITLE PAGE. ::ZZ140:1:ZZ:" ";:23:ZZ:" ";::ZZ122:ZZ:1:" ";:40:" "(0)"VERY IMPRESSIVE!"J nME$(1)"I SEE YOU'VE BEEN DOING YOUR HOMEWORK!"| xME$(2)"TOO BAD YOUR TEACHER CAN'T SEE THIS!" ME$(3)"WELL, WE CAN'T ALL BE PERFECT." ME$(4)"THAT WAS A GOOD TRY." ME$(5)"YOU ALMOST MADE IT ON THAT ONE."$ ME$(1%(1),M2%(1),ME$(8),MU(2),POLY%(2),R%(1),RE%(2)n FR(X)(X(1)1): RETURN RANDOM NUMBER BETWEEN 1 AND X PSIGN(X)(2R(2))3: RETURN RANDOM SIGN, 1 OR -1 ZDIVQQ(X)(XQQ)(XQQ): RETURNS 1 IF X IS A MULTIPLE OF QQ, 0 IF NOT. dME$l33,40:34,0" FACTORING4 VERSION 1.1P COPYRIGHT (C) 1983 BYn( MICROCOMPUTER WORKSHOPS2 PORTCHESTER, NY3 LAST UPDATE:11/21/844 BY: KEVIN VESSIO/ <K1%(9),K2%(9),C1%(2),C2%(2),D(2),E%(7),EF%(7),FA%(1,6,1),TE%(7),M                                   z #?    ҠǠ ǮIJ! ǠL Ԡ ӮϠ" Ġ ӠǮӠ3Ϡ Ϯà"ŠǠnҠϠ ӮϠ"ҮԠ Ϡ68,0:24:9:"Press "(9)"RETURN to continue.";Vi ZZ(1):ZZ(16384):ZZ1413560ti 16368,0:24:7:30);:i Draw a line.iPass coordinates ofithree points iniP%(1-3,1-2).i$P13:CX%P%(P,1):CY%P%(P,2):3160:3540:3480:Ped."h 3HC(CX%),VC(CY%)>h 17:24:(5):19:24:(5):[h Clear bottom of screen.oh 21:1:(6);:h Write an ordered pair.h Pass coordinates inh DX% and DY%.h "(";DX%;",";DY%;")";:h WAIT FOR USER TO HIT RETURN./i 163%CY%3430tgf 2HC(X%),VC(Y%):3480:R(3)3440,3450:" Good work, ";N$;".":"You found the right point.":3460gp " Brilliant job, ";N$;".":"That's the point you were looking for.":3460hz " Excellent, ";N$;".":"There's the point you want2HC(X%),VC(Y%):PL%1fN /fX Plot a point.Hfb Pass coordinates ofafl point to be plottedsfv in CX%, CY%.f 3480:17:24:"Plot:";:24:(15);(15);"____ ";(15);(16);3);:DX%CX%:DY%CY%:3500f H1%0f H2%0:771,32 g 3000:X%CX%Y10ĺ(5);!e Z1%6000,6100,6200Me 16368,0:PL%ĕ2HC(X%),VC(Y%):PL%0^e ZZ%133140e ZZ%723100,3110,3120,3030,3130e Y%Y%(Y%TC%1):3030e& X%X%(X%1TC%):3030e0 X%X%(X%TC%1):3030e: Y%Y%(Y%1TC%):3030fD PL%ĕC(TC%):HC(1),VC(4)HC(4),VC(4):HC(1),VC(6)HC(4),VC(6)Jd [d Move cursorod X%0:Y%0:PL%0vd 1d 2HC(X%),VC(Y%):PL%PL%d 768,((Y%CY%)2(X%CX%)2)7.525:769,25:770 e H1%Ģ19:32:DX%X%:DY%Y%:3500:X%10Y%Ϻ(1);1;:1:13:"&\";(3);:13:"^`";(4):6:13:5:11:1:"{0";:6:5;:17:5;:21:10:14:14:"|":13:"$}":19:13:"{0"c MG%ēHC(0),14HC(TC%),14:HC(0),0HC(TC%),0:HC(1),VC(TC%)HC(1),VC(TC%)Dd MG%ēHC(TC%),VC(TC%)HC(TC%),VZZ),VC(0)4:HC(0)4,VC(ZZ)HC(0)4,VC(ZZ):ZZ:2950b| ZZ1TC%:HC(ZZ),VC(TC%)HC(ZZ),VC(TC%):HC(ZZ),VC(TC%)HC(ZZ),VC(TC%):HC(TC%),VC(ZZ)HC(TC%),VC(ZZ):HC(TC%),VC(ZZ)HC(TC%),VC(ZZ):ZZb 9:21:"x":2:11:"y"~c C(0),VC(TC%)HC(0),VC(TC%)ah ROT= 0: DRAW 1 AT FN HC( - TC%), FN VC(0): ROT= 16: DRAW 1 AT FN HC(0), FN VC(TC%): ROT= 32: DRAW 1 AT FN HC(TC%), FN VC(0): ROT= 48: DRAW 1 AT FN HC(0), FN VC( - TC%)8br MG%āZZ1TC%TC%1:HC(ZZ),VC(0)4HC(37,75:48:1220,93`x 3580%` 520@`" SET UP AXES AND GRID``, 24:23:(23);(16);(25);j`6 3:1y`@ MG%2910`J HC(TC%)2,VC(0)1HC(TC%)2,VC(0)1`T HC(0)1,VC(TC%)2HC(0)1,VC(TC%)2a^ HC(TC%),VC(0)HC(TC%),VC(0):H7((P%(ZZ,2))):P%(ZZ,2):ZZA_Z 9:32:"I":31:"J K":32:"M"_d VTAB 13: HTAB 24: PRINT "Press "; CHR$ (9);"RETURN"; CHR$ (14);" when": HTAB 24: PRINT "the cursor is on": HTAB 24: PRINT "the right point."`n 1:0:1204,75:16:1220,58:32:12ZZ0:ZH0:N$"":G$""D`ǾG$:G$(8)51040:ZH(G$):ZH13ZZ0ıTbǭZH851065fdǭZZ1051040~fǭZH65ZH12251040hǭZH90ZH9751040jǭZZ0ĭZH90ZHZH32ɎoǭZZ0ĭZH97ZHZH32tǺ(ZH);:N$N$(ZH):ZZZZ1:51040yǭZZ05104NCTIONS"B(1);2[B115,0:116,150:103,0:104,64:16383,0:2999,0:(4);"RUNGRAPHING":103,0:104,64:16383,0:2999,0:(4);"RUNGRAPHING"DER"mI768790:J:I,J:I:162,0,142,0,32,238,3,3,208,248,173,4,3,201,63,240,5,238,4,3,208,236,96:768ACH(CS256):CLCSCH256:ADRS7,CL:ADRS8,CH:ADRS3A16304,0:16300,0:16297,0:16302,0B10:16:"LOADING":12:8:"GRAPHING LINEAR FU] @8191#@dLoad and init HRCG.@@n(4);"BLOAD RBOOT":520m@xADRS(0),"HRCG":ADRS0ADRSADRS65536@CSADRS2304:CS@@(4);"BLOAD ASCII.SET, A";CS:(4);"BLOAD NUMERATOR.SET, A";CS768:(4);"BLOAD DENOMINATOR.SET, A";CS1536`A  om user.NZFG$"":G1$"":VA$"";NdFT3%(37)1:T4%(36)1SNFT3%:T4%:G$;(5);NFG1$:G1$(8)18110:G1$((G1$)32(G1$"A"G1$"Z"))NFG1$"/"ĴG$""18110:(G$,1)"+"(G$,1)"-"18110NFG1$"0"G$"-"18110OFG1$(13)ĭG$""ĭ(tor in NU%.'MkBReduce first if RD%<>0.LMrBT1%(NU%)(NU%DE%):T2%(DE%)\MwBRD%17040M|BZZT2%21:T1%ZZ(T1%ZZ)T2%ZZ(T2%ZZ)T1%T1%ZZ:T2%T2%ZZMBZZMBT2%1ĺT1%;:MB(1);2;T1%;"/";(1);3;T2%;(1);1;:NPFGet monomial fr DY%. L6"(";DX%;",";DY%;")";:CL: WAIT FOR USER TO HIT RETURN.xL:16368,0:24:9:"Press RETURN to continue.";L:ZZ(1):ZZ(16384):ZZ14115020L:16368,0:24:7:30);:LhBPrint a fraction.LiBPass denominator in MjBDE%, numera'(G$,1)"."G$"0"G$=K$'Z1(G$):(G$,Z,1)"."10025:]K)'Z(G$)1G$G$"0":10050yK.'(G$)Z2G$(G$,Z2)KB'6(G$))G$:K2Clear bottom of screen.K221:1:(6);:K6Write an ordered pair.K6Pass coordinates inL6DX% and program.":" Press RETURN to reboot the disk.":20:16368,0JP$:P$(13)1310:(42204)238(42205)16(42206)192Č47731J((43626):J'LINE-UP ERROR COUNTSJ'G$(Z):3(G$))G$;:34:ZZP%:G$(Z)J'Z(Z)G$G$".00":10050K00?I20:P%0ĺ" You did not complete any problems.":1260vI8)"You completed "P%" problem";:P%1ĺ".":1260I"s."I15000:E5%0:E6%0:E7%0:E8%0:700@J(16):9:T$"Thank you, "N$".":(40(T$))2)T$:" I hope you enjoyed thising for a Variable .. ";:ZE5%:10000YH10:"Selecting Points ........ ";:ZE6%:10000:H12:"Plotting Points ......... ";:ZE7%:10000H14:"Calculation Errors ...... ";:ZE8%:10000I16:"Total ................... ";:ZE5%E6%E7%E8%:100 GV1000$G FINAL ERROR ANALYSIS0GP%P%1WG(16);10);"Total Error Analysis"G3:34:"Average":4:36:"per":5:8:"Error";:34:"Problem";:26:5:"Total";:8:5:(15);(15);"_____";:26:"_____";:34:"_______";(15);(16)$H8:"Solvy; but y"::"doesn't appear in this equation, so you"::"must solve for x instead.":SV$"x"FTY%1İ15000:4:1:(6);:25000F40000F15000:3:(6);:12:12:"One moment, please.":(4);"RUN GRAPHING.REST"FL41000:P%P%1:P%N%QT%1200_____________";(1);1E10:TY%1B%0ĺ" The first step in graphing this"::"equation is to solve it for y.":SV$"y":1040\FB%0ĺ" Well, ";N$;", this problem is an"::"unusual one. Normally, you would solve"::"the original equation for problems.":::"How many would you like? ";:G$""LDG$:N%(G$):N%0905UDG$;^DP%1D(16);:10:15:"Problem #"P%:45000:46000:(16);:20000:1:1:"Graph:";:1:(15);(15);"_____";(15);(16)E2:(1);2;"___________________________1) Easier (in the form y=mx+b)":11:"2) Harder (other forms)":13:"3) Mixed problems"sC!:"4) Exit the program"C*19:(6);"Your selection: ";:G$""C4G$:K%(G$):K%0K%4820CHG$;:G$"4"13001D(16):4:N$","::"you may try up to 9 :ZZ(ZZ):G$"N"G$"n"G$"N":G$;:800MBG$"Y"G$"y"G$"Y":G$;:720VB705B40000:(16):12:12:"One moment, please.":(4);"RUN GRAPHING.INSTRUCTIONS"B41000VC (16):"Okay, ";N$;".":5:"What kind of problems do you want?":9:"128730A(2999)01100'A50000OA(4);"BLOAD SHAPES":232,32:233,3ZA51000A(16);"Hi, "N$".":::"I will help you practice graphing"::"linear equations."::::"Do you want instructions (Y or N)? ";:G$"")BG$:ZZ(78)(79)16JO@ GRAPHING LINEAR FUNCTIONS7@ COPYRIGHT (C) 1983T@MICROCOMPUTER WORKSHOPSi@PORTCHESTER, NY@ LAST UPDATE:11/21/84@ BY: KEVIN VESSIO@6142@dR(X)(X(1)1)@nSIGN(X)32R(2)@xWH(X)(X(X)).0001A}(2999)                            1))B%:(ZZ$)P%(PP,2)Ģ20:1:(6);" That is incorrect, ";N$;"."::RX%(0)P%(PP,1)RX%(1);OP$;(C%B%);" = ";P%(PP,2)".":15000:E4%E4%1:540N062PP:33:(5);:36((P%(PP,2))):P%(PP,2);(5):800\OXP%(PP,1)T5%:P%(PP,2)C%B%:62PP:6(800UM18:1:(6);RX%(0)P%(PP,1)RX%(1);OP$;(C%B%);" = ";:110:25000:BAD550MZZ1(ZZ$):(ZZ$,ZZ,1)"/"Ă:ZZ$"1000":550M!20:1:"Sorry, "N$", the product must"::"be a whole number.":E4%E4%1:15000:540N&P%(PP,2)(C%A%P%(PP,5000:BAD520^L18:1:N$", the product must"::"be a whole number.":E4%E4%1:15000:510L(ZZ$)RX%(0)P%(PP,1)RX%(1)Ģ18:1:" That is incorrect, ";N$;"."::RE$;" * ";P%(PP,1);" = ";RX%(0)P%(PP,1)RX%(1)".":15000:E4%E4%1:510M C%0divisible by the denominator of the"::"coefficient of "IV$".":15000:420KP%(PP,1)T5%:62PP:6((P%(PP,1))):P%(PP,1);:HP%:DV$;" = ";TE$:RX%(0)RX%(1)525 L30000:VA$"":CO%(0)RX%(0):CO%(1)RX%(1):19000:RE$;" * ";P%(PP,1);" = ";:110:2 ";DV$;" will not be"::"in the range ";1TC%;" to ";TC%1;".":490LJ500J:TE$;" = ";:CO%(0)C%A%T5%:CO%(1)B%:RD%1:19000:RD%0:RE$:15000:E2%E2%1:WRWR1:WR1420JWH(T5%A%B%)420JK30000:" Use zero or a number that is"::"2,1)((C%B%))IWH(T5%A%B%)İ30000:" That's a poor choice, ";N$;"."::"If ";IV$;" is ";T5%;", then ";DV$;" will not be"::"an integer.":490CJ((C%A%T5%)B%)TC%İ30000:" We can't plot that, ";N$;"."::"If ";IV$;" is ";T5%;", thenT5%P%(2,1B%))İ30000:" Choose a different value. You"::"already used that one.":15000:30000:420xHA%0600HB%0700HVA$"":TE$(T5%):RX%(0)RX%(1)CO%(0)RX%(0):CO%(1)RX%(1):19000:TE$"("RE$")("TE$")"IC%TE$TE$(OP$,t an integer.":15000:30000:E2%E2%1:420G(T5%)TC%İ30000:" I'm sorry, ";N$;", but the"::"graph we use only fits points with"::"coordinates between ";1TC%;:" and ";TC%1;".":15000:30000:E2%E2%1:420jH(PP1T5%P%(1,1B%))(PP3 have integral"::"coordinates.":15000:30000?FPP13:WR0F30000:"Enter the ";IV$;" coordinate: ";:110:25000:BAD420F((ZZ$))32766ZZ$"1000"F30000*GT5%(ZZ$):T5%(ZZ$)İ30000:" Try again, ";N$;"."::"That number is no40212,103NEr15:1:(1);2;"________________________________________";(1);1xE|IV$"x":DV$"y":B%0IV$"y":DV$"x".F16384,0:30000:" Now you must find three points on"::"the line. Don't forget to choose points":"that fit on our graph andDJE$"y = ":A%RD%1:19000:E$E$RE$:C%RD%0:E$E$(OP$,2,1)((C%B%))eDTA%E$E$(C%B%)D^6:5:"x";:HP%18((E$)2)3(WH(A%B%)):HP%:E$;:35:"y" Eh3:14,49266,49:14,51266,51:56,4056,103:58,4058,103:210,40210,103:212,X)(XSS%(2TC%)SS%2.5)BCVC(Y)(YSS%(2TC%)SS%2.5)C,3:1:(6);:TT%TY%:TY%1:46000:TY%TT%:VA$"x":CO%(0)RX%(0):CO%(1)RX%(1)C6B%0E$"x = "(C%A%):6:5:"y";:HP%17:HP%:E$;:35:"x":360C@OP$" + ":C%B%0OP$" - "M$"x"G1$"y"ĭ(ZZ$)1āX91(ZZ$):G1$(ZZ$,X9,1)115:UB~G1$"x"G1$"y"115xBZZ$ZZ$G1$:ZZZZ1:G1$;:115BZZ0115B(8)" "(8);:ZZ1110BZZ$(ZZ$,(ZZ$)1):ZZZZ1:115BZZ0(ZZ$,1)"+"(ZZ$,1)"-"110BCHC(Z$"":G1$"":ZZ0:ZH0AAsG1$:G1$(8)115:ZH(G1$):ZH13160bAt(G1$"-"G1$"+")ZZ0115AuG1$"0"ZH8ĭZZ$"+"ZZ$"-"115AxZH8150:ZZ$"0"115AyZZ6115Az(ZH43ZH45)(ZH46ZH58)135A|ZH88ZH89G1$(ZH32):B}G1H@2999,255 @(41000:50000@2ZZ770790:X%:ZZ,X%:ZZ:173,48,192,136,208,5,206,1,3,240,9,202,208,245,174,0,3,76,2,3,96@<WH(X)(X(X)).0001@FR(X)(X(1)1)@PSIGN(X)32R(2)@ZPI3.1415926535@dTC%11:SS%154:200AnZ                             13ZZ%75ZZ%733030StX%0ZZ%75Ģ24:8:" To move up, press . ";:3070otX%1Y%3ZZ%733070tY%3ZZ%13Z1%Z1%1:3070t3030t8X%2Ģ24:8:"To move right, press .";u=X%2Y%7Ģ24:8:" To move up, press . "3030?sY%0ZZ%77Ģ24:8:" Now press . ";:3070asY%1ZZ%13Z1%Z1%1:3080ks3030sX%0Ģ24:8:"To move right, press .";sY%3Ģ24:8:" Now press . ";tZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%r<LOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZ:rFrPLOC%,1(V%):V%(V%):LOC%1,V%256(V%256):LOC%2,(V%256):LOC%LOC%3:rpY%0Ģ24:8:"To move down, press .";szZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%77ZZ%753070 qVX%2Y%73070Bq`X%2ZZ%13Y%7Z1%4:3070Lqj3030200:V%E1%:5200:V%E2%:5200:V%E3%:5200:V%E4%:5200:V%P%:5200:V%N%:5200:V%K%:5200:V%TY%:5200q2V%E5%:5200:V%E6%:5200:V%E7%:5200:V%E8%:5200:V%QT%:52004Ģ24:8:"To move right, press .";Zp=X%2Y%7Ģ24:8:" To move up, press . ";p>X%2Y%7Ģ24:8:" Now press . ";pBZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%75ZZ%733030pGX%2ZZ%753030 qLX%224:8:" Now press . ";qoZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%75ZZ%733030oX%0ZZ%75Ģ24:8:" To move up, press . ";:3070oX%1Y%3ZZ%733070oY%3ZZ%13Z1%Z1%1:3070o3030$p8X%2move down, press .";^nzZZ%(16384)128:ZZ%ZZ%32(ZZ%96ZZ%123):ZZ%13ZZ%773030nY%0ZZ%77Ģ24:8:" Now press . ";:3070nY%1ZZ%13Z1%Z1%1:3080n3030nX%0Ģ24:8:"To move right, press .";!oY%3:5200:V%TY%:5200Wm2V%E5%:5200:V%E6%:5200:V%E7%:5200:V%E8%:5200:V%QT%:5200m<LOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZmFmPLOC%,1(V%):V%(V%):LOC%1,V%256(V%256):LOC%2,(V%256):LOC%LOC%3:npY%0Ģ24:8:"To SAVE YOUR LOGO PROGRAM WITH THE":18:" FILENAME: HELLO."C (22: J : CLEAR SCREEN<230,32:3086: CLEAR PAGE 1d(13)(4);"BLOAD CBS.LOGO,A$2000"49236,0: DISPLAY PAGE 1#T13500:T(::2(13)(4)"RUN COVER"2PRINT CHR$(13)CHR$(4)"(34)"RUN COVER"(34)9 16:" L" <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""**6""">>> " >YEEY>">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">"""""""""""""**6"""">>>>"">000000>(~ <&20  **>> "2*&" " >> ">> """>""""""< >> "   G1$"y"VA$G1$-rG1$(8)G$G$G1$:4070M|(G$)2G$"":VA$"":4070q(G$,1)"x"(G$,1)"y"VA$""G$(G$,(G$)1):4070D$""T3%:T4%:DE%(D$):DE%ĺ(1);2;G$;"/";(1);3;DE%;(1);1;(5);:4280(1);2;G$;"/";(1);1;(5)1:DE%NU%:.~"G$"-x"G$"-y"NU%1:DE%1:G~,G$""NU%0:DE%1:p~6NU%((G$,(G$)(VA$""))):DE%1:~@G1$"/"4200~JG$"x"G$"y"NU%1:4250~TG$"-x"G$"-y"NU%1:DE%1:4250~^NU%((G$,(G$)(VA$""))):4250hG1$"x"G1$)32(G1$"A"G1$"Z"))}((G1$"0"G1$"9")G1$(13)G1$(8)(G1$"-"G$"")(G1$"x"G1$"y"VA$"")(G1$"/"G$""))(VA$""G1$"/"G1$(13)G1$(8))4080}((G$G1$))327674080}G1$(13)4160 ~G$"x"G$"y"NU%T2%21:T1%ZZ(T1%ZZ)T2%ZZ(T2%ZZ)T1%T1%ZZ:T2%T2%ZZH|ZZ[|T2%1ĺT1%;:|(1);2;T1%;"/";(1);3;T2%;(1);1;:|Get monomial from user.|G$"":G1$"":VA$""|T3%(37)1:T4%(36)1|T3%:T4%:G$;(5);}G1$:G1$((t, ";N$;". You have graphed:":5290:22:4560:22:1:(6);LS$;" = ";E$:3540:5110Y{Zp{dPrint a fraction.{nPass denominator in{xDE%, numerator in NU%.{Reduce first if RD%<>0.{T1%(NU%)(NU%DE%):T2%(DE%){RD%4020@|ZZZYA)TC%ĂZZ?zHC(XZZXA),VC(YZZYA)HC(X(2)),VC(Y(2))Qz(XAXA:YAYAz2ZZAS%11:(XZZXA)TC%(YZZYA)TC%ĂZZz<HC(XZZXA),VC(YZZYA)HC(X(2)),VC(Y(2))zFZZ12:ZZ:Fix prematurely exited FOR loops.S{P3480:" Grea%ĂZZ7yHC(XZZXA),VC(YZZYA)HC(X(1)),VC(Y(1))qy(X(2))TC%XI(XI)(X(2)):YI(YI)(X(2))(M)y(Y(2))TC%YI(YI)(Y(2)):XI(XI)(Y(2))(M)y XX(2)AS%XI:YY(2)AS%YI:YAXI:XAYI zZZAS%11:(XZZXA)TC%(YZC%YI(YI)(Y(1)):XI(XI)(Y(1))(M)WxXX(1)AS%XI:YY(1)AS%YI:YAXI:XAYIxZZAS%11:(XZZXA)TC%(YZZYA)TC%ĂZZxHC(XZZXA),VC(YZZYA)HC(X(1)),VC(Y(1))xXAXA:YAYAyZZAS%11:(XZZXA)TC%(YZZYA)TC%X(P)X:Y(P)Y:PP1:P33730@wX(P)TC%:Y(P)(C%A%X(P))B%mwHC(X(1)),VC(Y(1))HC(X(2)),VC(Y(2))wAS%4:MA%B%:XI((M))(HC(1)HC(0)):YI((M))(VC(1)VC(0))w(X(1))TC%XI(XI)(X(1)):YI(YI)(X(1))(M)*x(Y(1))TA%),VC(TC%)HC(C%A%),VC(TC%):48:1HC(C%A%),VC(TC%):16:1HC(C%A%),VC(TC%):3920vjP1:XTC%:Y(C%A%X)B%:(Y)TC%X(P)X:Y(P)Y:P2vtYTC%:X(C%B%Y)A%:(X)TC%X(P)X:Y(P)Y:PP1:P33730w~YTC%:X(C%B%Y)A%:(X)TC0~Ǻ(8)" "(8);:ZZ151030BN$(N$,(N$)1):ZZZZ1:51040HDZL" <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""**6 >>> " >YEEY>">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">"""""""""""""**6"""">> ""(~ <&20 *, >>  <>> "   6%E7%E8%:10000NI20:P%0ĺ" You did not complete any problems.":1260I8)"You completed "P%" problem";:P%1ĺ".":1260I"s."I15000:E5%0:E6%0:E7%0:E8%0:700OJ(16):9:T$"Thank you, "N$".":(40(T$))2)T$:" I hope y)3H8:"Solving for a Variable .. ";:ZE5%:10000hH10:"Selecting Points ........ ";:ZE6%:10000:H12:"Plotting Points ......... ";:ZE7%:10000H14:"Calculation Errors ...... ";:ZE8%:10000I16:"Total ................... ";:ZE5%E%P%1:P%N%QT%1200GV10003GERROR ANALYSIS?GP%P%1fG(16);10);"Total Error Analysis"H3:34:"Average":4:36:"per":5:8:"Error";:34:"Problem";:26:5:"Total";:8:5:(15);(15);"_____";:26:"_____";:34:"_______";(15);(16 for y; but y"::"doesn't appear in this equation, so you"rF B%0TY%1ĺ:"must solve for x instead.":SV$"x"FTY%1İ15000:4:1:(6);:25000F40000F15000:3:(6);:12:12:"One moment, please.":(4);"RUN GRAPHING.REST"GL41000:P___________";(1);1E10:TY%1B%0ĺ" The first step in graphing this"::"equation is to solve it for y.":SV$"y":1040:FB%0TY%1ĺ" Well, ";N$;", this problem is an"::"unusual one. Normally, you would solve"::"the original equationoblems.":::"How many would you like? ";:G$""JDG$:N%(G$):N%0905SDG$;\DP%1D(16);:10:15:"Problem #"P%:45000:46000:(16);:20000:1:1:"Graph:";:1:(15);(15);"_____";(15);(16)E2:(1);2;"_____________________________ Easier (in the form y=mx+b)":11:"2) Harder (other forms)":13:"3) Mixed problems"qC!:"4) Exit the program"C*19:(6);"Your selection: ";:G$""C4G$:K%(G$):K%0K%4820CHG$;:G$"4"1300/D(16):4:N$","::"you may try up to 9 prZ(ZZ):G$"N"G$"n"G$"N":G$;:800KBG$"Y"G$"y"G$"Y":G$;:720TB705B40000:(16):12:12:"One moment, please.":(4);"RUN GRAPHING.INSTRUCTIONS"B41000TC (16):"Okay, ";N$;".":5:"What kind of problems do you want?":9:"1)9)128730:(2999)01100%A50010MA(4);"BLOAD SHAPES":232,32:233,3XA51020A(16);"Hi, "N$".":::"I will help you practice graphing"::"linear equations."::::"Do you want instructions (Y or N)? ";:G$""'BG$:ZZ(78)(79)16:ZQL@ GRAPHING LINEAR FUNCTIONS8@ COPYRIGHT (C) 1983V@ MICROCOMPUTER WORKSHOPSl@ PORTCHESTER, NY@LAST UPDATE:11/30/84@ BY: KEVIN VESSIO@6142@dR(X)(X(1)1)@nSIGN(X)32R(2)@xWH(X)(X(X)).0001A}(299                          L" <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""**6""">>> " >YEEY>">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">"""""""""""""**6"""">> ""(~ <&20 *, >>  <>> "   MP%2E$E$"+("RE$")("sYPCY%(0)VA$"y":CO%(0)CY%(0):CO%(1)CY%(1):19000:E$""(E$,1)"("E$E$RE$:20640YPCY%(0)E$E$SI$RE$YPAY%(0)VA$"y":CO%(0)AY%(0):CO%(1)AY%(1):19000:E$""(E$,1)"("E$E$RE$:20700ZPAY%(0)E$E$SI$0)VA$"x":CO%(0)AX%(0):CO%(1)AX%(1):19000:CX%(0)E$E$SI$RE$:20600_Xb30000:19:"1) Add same value to both sides":"2) Subtract same value from both sides"aHb"3) Multiply both sides by same value":"4) Divide both sides by same value"bRb17:(9);"Enter your choice:";5000:VP%4:VP%:1:200);200);:VP%:20000`*bLSV%(0)LY%(0):LSV%(1)LY%(1):RSV%(0)RY%(0):RSV%(1)RY%(1):LOV%(0)LX%(0):LOV%(1)LX%(1):ROV%(0)RX%(0):ROV%(1)RX%(1),a4bSV$"x"LSV%(0)LX%(0):LSV%(1)LX%(1):RSV%(0)RX%(0):RSV%(1)RX%(1):LOV%(0)LY%(0)LY%(0)0LC%(0)0IV%1j_bSV$"y"RX%(0)0RY%(0)0RC%(0)0SV$"x"RX%(0)0RY%(0)0RC%(0)0IV%1_ bSV$"y"IV%1LY%(0)LY%(1)1SV$"y"IV%1RY%(0)RY%(1)1SV$"x"IV%1LX%(0)LX%(1)1SV$"x"IV%1RX%(0)RX%(1)125500+`%bVP%12İ1%(ZZ)ZZ:AY%(ZZ)ZZ:AC%(ZZ)ZZ:MC%(ZZ)ZZ:ZZ:LMP%0:RMP%0J^aVP%(37)1^a15:(1);2;"________________________________________";(1);1^aVP%:20000^aIV%0^aOV$"x":SV$OV$OV$"y"_ bSV$"y"LX%(0)0LY%(0)0LC%(0)0SV$"x"LX%(0)0PAREN(ZZ,0)(PAREN(ZZ1,0)PAREN(ZZ2,0))20960]QPAREN(ZZ,1)2E$(E$,PAREN(ZZ,1)1)(((E$,PAREN(ZZ,1)))51PAREN(ZZ,0))(E$,PAREN(ZZ,1)1):20960]QE$(((E$,PAREN(ZZ,1)))51PAREN(ZZ,0))(E$,2)]QZZ]Q]aSOLVE AN EQ:^aZZ01:AX/("RE$")":208002\,QMP%1MP%2MP%3E$E$")"D\@QE$""E$"0"\QT1%0:ZZ1(E$):(E$,ZZ,1)"("(E$,ZZ,1)")"T1%T1%1:PAREN(T1%,0)((E$,ZZ,1)")"):PAREN(T1%,1)ZZ\QZZ\QZZ1T1%:PAREN(ZZ,0)ĭPAREN(ZZ1,0)PAREN(ZZ2,0)20960/]Q)"("E$E$RE$:20740/[PCC%(0)E$E$SI$RE$[QAC%(0)VA$"":CO%(0)AC%(0):CO%(1)AC%(1):19000:E$""(E$,1)"("E$E$RE$:20800[QAC%(0)E$E$SI$RE$[Q(E$,1)"("E$E$"0"\"QMP%DIV%CO%(0)MC%(0):CO%(1)MC%(1):VA$"":19000:E$E$")RE$+ZPMP%3DIV%E$""E$E$"+(":20720IZPMP%3DIV%E$"(":20720ZPMP%3VA$"":CO%(0)MC%(0):CO%(1)MC%(1):19000:E$""E$"("RE$")(":20720ZPMP%3E$E$"+("RE$")("[PCC%(0)VA$"":CO%(0)CC%(0):CO%(1)CC%(1):19000:E$""(E$,1 instructions (Y or N)? ";:G$""BNG$:G$"Y"G$"y"ĺ"Y";:240[NG$"n"G$"N"530eN&"N";N0(16):12:(30(N$))2:"Good luck, ";N$;"."N:5140:2999,128:(4);"RUN GRAPHING"OD(16):10:7:"Would you like to do a"::7:"sample proLC%(1)ZZ)WH(RX%(0)RX%(1)ZZ)WH(RY%(0)RY%(1)ZZ)WH(RC%(0)RC%(1)ZZ))28500lx*nDE%1XX%NU%:28210x+nNU%DE%XX%NU%DE%:28210x,nXX%DE%NU%/y2n(XX%)(B%)28220:" I don't agree, ";N$;"."::"The number you have chosen will not"::"):281900wnCO%(0)LSV%(0):CO%(1)LSV%(1):28190Yw nCO%(0)RSV%(1):CO%(1)RSV%(0):28190{wnCO%(0)RSV%(0):CO%(1)RSV%(1)wnRD%1:19000:RE$;".":15000:E1%E1%1:28100Rx(nZZMD(NU%DE%):IV%(WH(LX%(0)LX%(1)ZZ)WH(LY%(0)LY%(1)ZZ)WH(LC%(0)).0001)(IV%1(MD(DE%NU%)RSV%(0)RSV%(1)).0001))28200vm" That's not right, ";N$;".":18:1:"To eliminate the coefficient of ";SV$;", you"::"should";OP$;"by ";:VA$""wm2(IV%1)(MD(2).5)28160,28170,28180:CO%(0)LSV%(1):CO%(1)LSV%(0equation.":15000:30000:E1%E1%1:um(MD(NU%DE%))1ĺ" That won't help, ";N$;"."::COP$;"ing by the number you have"::"chosen will only make the coefficients"::"bigger.":15000:30000:E1%E1%1:n" by ";:DE%1ĺNU%:28225y?n(1);2;G$"/";(1);3;DE%;(1);1;(5)&zAn:"is not incorrect, we prefer that you"::"iso"-":RE$(RE$,2)/lgSI$;" ";RE$;" = ";:18000jlgVA$S$(NU%DE%S%(0)S%(1)).0001NU%S%(0)26650mh30000:" Sorry, ";N$;"."::VA$S$:RD%1:CO%(0)L%(0):CO%(1)L%(1):19000:RE$;" ";:CO%(0)A%(0):CO%(1)A%(1):19000:SI$""SI$"-":RE$(RE$SI%NU%:A%(1)DE%kgS%(1)L%(1)A%(1):S%(0)L%(0)A%(1)A%(0)L%(1):ZZS%(1)21:WH(S%(0)ZZ)WH(S%(1)ZZ)S%(0)S%(0)ZZ:S%(1)S%(1)ZZkgZZlgVA$S$:RD%1:CO%(0)L%(0):CO%(1)L%(1):19000:RE$;" ";:CO%(0)A%(0):CO%(1)A%(1):19000:SI$""SI$0ajgVA$""AC%(0)SI%NU%:AC%(1)DE%:L%(0)LC%(0):L%(1)LC%(1):R%(0)RC%(0):R%(1)RC%(1):26550jgS$VA$:VP%VP%2:VP%:20000:AX%(0)0:AY%(0)0:AC%(0)0jg30000:" Now you must simplify by combining"::"any like terms.":15000:30000kgA%(0):19000:RE$;TF$;"both sides.":15000:30000:E1%E1%1:26100igVA$"x"AX%(0)SI%NU%:AX%(1)DE%:L%(0)LX%(0):L%(1)LX%(1):R%(0)RX%(0):R%(1)RX%(1):26550jgVA$"y"AY%(0)SI%NU%:AY%(1)DE%:L%(0)LY%(0):L%(1)LY%(1):R%(0)RY%(0):R%(1)RY%(1):2655n't do much good, ";N$;"."::"There's no constant term on the left"::"side for you to move.":15000:30000:E1%E1%1:26100.":::11:"Name: ";6VZZ0:ZH0:N$"":G$""e`ǾG$:G$(8)51040:ZH(G$):ZH13ZZ0ıfǴZH851070:ZZ1051040:ZH65ZH12251040:ZH90ZH9751040ċjǭZZ0ĭZH90ZHZH32ދoǭZZ0ĭZH97ZHZH32tǺ(ZH);:N$N$(ZH):ZZZZ1: and Kevin Vessio"nâ12:11:"Designed by Don Ross":15:10:"Microcomputer Workshops":17:16:"Courseware"â19:18:"@ 1984":ZZ12500:ZZ:2999,255:Lǹ16384,0:(16);:4:" Please enter your first name (up to"::" ten letters) and press )A%:LY%(0)B%:RC%(0)C%:?ܴLX%(0)A%:LY%(0)B%::LC%(0)C%:d@LY%(0)B%:RX%(0)A%:RC%(0)C%:wZÑ:16302,0:6dÁZZ010:ZZ,ZZ279ZZ,ZZ279ZZ,191ZZZZ,191ZZZZ,ZZ:ZZú(1);1;:7:9:"Graphing Linear Functions":10:6:"By Mark Berman ` 8Pt 8hII 8g ..???--?8 ??-          ! ." M20]M(16):5:"After each problem, I will give you a"::"summary of your errors."M10:"When you finish a set of problems, I"::"will give you a total error analysis."M20:580 N(16):10:" Would you like to review the"::" I will help you. You will be able to"::"choose between sound clues and silent"::"clues."M15:"When you have plotted all three points,"::"I will finish the problem by drawing the":"line through them. That line is the"::"graph of the equationthe cursor left."::5);(9);"K";(14);" moves the cursor right."::5);(9);"M";(14);" moves the cursor down."K19:"In case you forget, there is a chart"::"next to the graph."K20\L(16):3:"If you make a mistake plotting a point,"::";(14);", ";(9);"J";(14);", ";(9);"K";(14);","::"and ";(9);"M";(14);" keys. If you find these keys and"::"notice their positions, it will make"J:"sense that:":qK5);(9);"I";(14);" moves the cursor up."::5);(9);"J";(14);" moves t the center"::"of the graph, you will see a flashing X,":"called the cursor."I15:"To plot a point, just move the cursor"::"to the correct location, and press"::(9);"RETURN";(14);"."I20J(16);"To move the cursor, use the ";(9);"I""Be sure that x and y are integer"::"values between -10 and 10 so that"::"the coordinate can be plotted on our"::"graph."Hh20Hr(16);"When you have chosen three points, your"::"last step is to plot them."PI|7:"I will show you a graph. A6);"When the equation is in the proper form,":"you must find three pairs of coordinates":"in order to plot them on the line. For"GT7:"each pair, you will choose the value"::"of x. I will help you find the"::"corresponding value of y."~H^14:::"the screen."hF,9:"If the equation is not in the form"::"y=mx+b, you will have to solve for y."F615:"In a few problems, y may not appear in"::"the equation. In these special cases,"::"you will solve for x instead of y."F@20GJ(1n the form y=mx+b.":"The harder equations are in other forms."E13:"You may choose either type, or you may"::"select a mixture of the two types."E20F"(16);"When you begin working on a problem, I"::"will print the equation at the top of"act same value from both sides"sD"3) Multiply both sides by same value":"4) Divide both sides by same value";:DG$:G$(13)230:DInstructionsD(16);"Hi, ";N$;"!">E5:"I know two types of problems. The"::"easier equations are i200:QT%V%@CN$"":L%(LOC%):ZZ1L%:N$N$((LOC%ZZ)):ZZKCLOC%0QCCV%((LOC%)1)((LOC%1)256(LOC%2)):LOC%LOC%3:D15:1:(1);2;"________________________________________";(1);1:"1) Add same value to both sides":"2) Subtr56):LOC%2,(V%256):LOC%LOC%3::BRestore variables.HBLOC%3000B200:A%V%:200:B%V%:200:C%V%:200:E1%V%:200:E2%V%:200:E3%V%:200:E4%V%:200:P%V%:200:N%V%:200:K%V%:200:TY%V% C200:E5%V%:200:E6%V%:200:E7%V%:200:E8%V%:0:V%E2%:120:V%E3%:120:V%E4%:120:V%P%:120:V%N%:120:V%K%:120:V%TY%:120AZV%E5%:120:V%E6%:120:V%E7%:120:V%E8%:120:V%QT%:120AdLOC%,(N$):ZZ1(N$):ZZLOC%,((N$,ZZ,1)):ZZAn"BxLOC%,1(V%):V%(V%):LOC%1,V%256(V%20@ 130:2403@ WAIT FOR USER TO HIT RETURN.h@16368,0:24:9:"Press RETURN to continue.";@(ZZ(1):ZZ(16384):ZZ14140@216368,0:24:7:30);:@<Store variables.@FLOC%3000QAPV%A%:120:V%B%:120:V%C%:120:V%E1%:12              " " " """""""""     `D 0f0XMaxcsOlfA `׿ժu`z/j+Uj`虢`D 0o0xLa `3X""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>">>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "$$! $%%#,fp% "Lp"% $`"H Β*+)hi#"H Β!*0+i+idH#d hd`"%$$%H hi#`$% Βc,d*+Me,dPMc*!0 +i+`%J) b+je *`PPPP򠥹,r0tL"$!e (' !!%##`f`" e$$ ",r0st(!#L"L $b . % `L a,gPgA[8 & & &mh)mi ̒e$*+Me$(Mc,dp ,cpP!pA* +i+Mebrs"t`,Tb@0,U`* L" {LB$!$$"% %L"c`g`g`,,Lҩc`@a`de` qLXde`s$t%L$td`e`g`f`Yd`e`L$e (' 8!$!$%"{LȎ !%# "LȎ5 )5`)aW L| JHIHa`G~ҏ#+@HPXs{ɐG֐G+R$a`1  emhi` b` ,r0rbj$s%t`@b`s$$hLde`,rSjd LL LHLH C `u8967 ,R,W U ,P` Р̺((*)  b+*HN OI*P,h*,H,`0ɛ` ɍ $h`ɐ 6+` qLȎ LȎ       !!! ! X Y Z [ \ ] hhh`HH ' hh^ `HHHV  V ` Lhhh`,n àϠȥ𬠄𠠠ŠϠÊәĠ̠ m ` 18)`8`HHH n  V H$hb V W X Y m [ l \ ] S ^ T _  ' hhh`HHV ' b i-c ihh`HH$Hȱhhh` LHHHHHHV W L m m  뭒 L   m   (m , r0+p  LJ  LJ -  ȱ  LJ ȱ  LJ s tL m JJJJl ȱm n   ,L, L%" n  :, " +, S l L\DЪ m L\        s t   ަL !8 HȑnhmȑstLS g ^ m  ` ^LLg L@A8m  @0 /@   q@8 @8e@@AiAP`L2Ġ JJJJHȱH ȩȩȩȑhhȩȩȑ /"& &  "  gLS) LSȩȩȩ ȩȩȩ gȭ  1!ijTY%46100,46200,46300,46400jB%LY%(0)1:RX%(0)A%(B%.05):RX%(1)(B%):RC%(0)C%B%:RC%(1)1}(B%)246140ц(ZZ(B%)21:WH(RX%(0)ZZ)WH(RX%(1)ZZ)RX%(0)RX%(0)ZZ:RX%(1)RX%(1)ZZن2ZZBFIKMOQSUY[]_acegikmoqsuwy{} <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80,ttom of screen."h 21:1:(6);:>h Write an ordered pair.Wh Pass coordinates inih DX% and DY%.h "(";DX%;",";DY%;")";:h WAIT FOR USER TO HIT RETURN.h 16368,0:24:9:"Press "(9)"RETURN to continue."; i ZZ(1):ZZ(16384):ZZ;".":"You found the right point.":3460xgp " Brilliant job, ";N$;".":"That's the point you were looking for.":3460gz " Excellent, ";N$;".":"There's the point you wanted."g 3HC(CX%),VC(CY%)g 17:24:(5):19:24:(5):h Clear bo point to be plotted&fv in CX%, CY%.f 3480:17:24:"Plot:";:24:(15);(15);"____ ";(15);(16);3);:DX%CX%:DY%CY%:3500f H1%0f H2%0:771,32f 3000:X%CX%Y%CY%3430'gf 2HC(X%),VC(Y%):3480:R(3)3440,3450:" Good work, ";N$0e ZZ%1331406e ZZ%723100,3110,3120,3030,3130Re Y%Y%(Y%TC%1):3030ne& X%X%(X%1TC%):3030e0 X%X%(X%TC%1):3030e: Y%Y%(Y%1TC%):3030eD PL%ĕ2HC(X%),VC(Y%):PL%1eN eX Plot a point.eb Pass coordinates offld Move cursor"d X%0:Y%0:PL%0)d 1Id 2HC(X%),VC(Y%):PL%PL%d 768,((Y%CY%)2(X%CX%)2)7.525:769,25:770d H1%Ģ19:32:DX%X%:DY%Y%:3500:X%10Y%10ĺ(5);d Z1%6000,6100,6200e 16368,0:PL%ĕ2HC(X%),VC(Y%):PL%7:5;:21:10:14:14:"|":13:"$}":19:13:"{0"c MG%ēHC(0),14HC(TC%),14:HC(0),0HC(TC%),0:HC(1),VC(TC%)HC(1),VC(TC%)c MG%ēHC(TC%),VC(TC%)HC(TC%),VC(TC%):HC(1),VC(4)HC(4),VC(4):HC(1),VC(6)HC(4),VC(6)c ZZ),VC(TC%)HC(ZZ),VC(TC%):HC(ZZ),VC(TC%)HC(ZZ),VC(TC%):HC(TC%),VC(ZZ)HC(TC%),VC(ZZ):HC(TC%),VC(ZZ)HC(TC%),VC(ZZ):ZZb 9:21:"x":2:11:"y"1c (1);1;:1:13:"&\";(3);:13:"^`";(4):6:13:5:11:1:"{0";:6:5;:1): ROT= 16: DRAW 1 AT FN HC(0), FN VC(TC%): ROT= 32: DRAW 1 AT FN HC(TC%), FN VC(0): ROT= 48: DRAW 1 AT FN HC(0), FN VC( - TC%)ar MG%āZZ1TC%TC%1:HC(ZZ),VC(0)4HC(ZZ),VC(0)4:HC(0)4,VC(ZZ)HC(0)4,VC(ZZ):ZZ:2950b| ZZ1TC%:HC(ROBLEM.":100V34,0::11:11:"ONE MOMENT, PLEASE.":20:(13)(4)"RUN FACTORING"I4,153 23:10:"PRESS THE MINUS KEY <->.":9:15I G$:G$"-"1190u G$;::23:13:"NOW PRESS <6>.":9:16 G$:G$"6"2010 G$;:20:"= X";:8:"2";:9:"-11X+30":34,12: 15:15:"WELL DONE!":18:" YOU'VE COMPLETED THE SAMPLE PRESS <5>.":9:9& `G$:G$"5"1120 jG$;::"NOW WE MUST MOVE THE CURSOR AGAIN.":23:4:"PRESS THE RIGHT ARROW KEY TWICE.":9:10 tG$:G$(21)1140 ~" ";:13 G$:G$(21)1160 " ";:34,13::"THE SECOND FACTOR IS ( X-6 )."::3ACTORS IN.":100? $:"THE FIRST FACTOR IS ( X-5 ).":34,15: .21:"TO MOVE THE CURSOR, PRESS THE RIGHT"::"ARROW KEY.":9:6 8G$:G$(21)1080 B:23:7:"NOW PRESS THE MINUS KEY <->.":9:8 LG$:G$"-"1100 VG$;::23:14:"NOW P---------------------------":34,13 14:" THE CURSOR WILL APPEAR INSIDE THE"::"PARENTHESES. THIS IS WHERE YOU WILL"::"ENTER YOUR FACTORS.":100 :" THE FACTORS FOR THIS EQUATION ARE"::"( X-5 ) AND ( X-6 ). NOW YOU MUST"::"TYPE THE F7:N$", ":3:"LET'S USE AN EASY QUADRATIC TRINOMIAL"::"AS OUR SAMPLE PROBLEM.":100 :"SAMPLE":16:"2"::"FACTOR";::15:"X -11X+30":"----------------------------------------"# ::"WORK SPACE":::5:"( X )( X )":12:"-------------X  FACTORING: SAMPLE PROBLEM? BY KEVIN VESSIO 9/13/84MI0:N$""~II1:IN(768I):IN01000:N$N$(IN):25c PRESS RETURNd24:9:"PRESS ";::"RETURN";::" TO CONTINUE.";:16368,0i(16384)12813105nX 34,0::"" " " " " "