`L i=L\Ʃx ? N'i  ͭЅ?0ȱ Ѕ?iȱi lԠԠ͠ԠϠŠͮŠ SYSTEM.APPLE   L$J =␮fIGc"UҮ ad4':m<3&yL?RhدK dtWjIzc|oSZT{R.zÚ3 &k2`8L>pĠ=PæV= _nhRn!uSg-OƆ/9 6)E٘h TQ$M{*]+#Ai<,/BuE&;TGdZ'1SgslB_rфw$tպ( .xBܧq@KF(k ҮX>^ziwpDv)M 5s|PAbM%YY,x:2e+q_D7Jl}1еC%+\.ObX[Q@St5gzsEyg060±cHNe!"J `@fb%x~'1INTROSGNUMCTRLUIPLOTIGRAFSIMPMIDENTIFORMFAINTFTTRMISOLVSOLVEFRINTTESTPROG |Xó 9 (E 1QF$I*]h#i|x'g YC5Szk![;8tc4yOmFa`X(-k8ZO'K WC5[5)'@FwZd(^)&vV) 8 AMd!,g2eNI+о7IJ}rk!ڄ}./0(Nhz 9@׳:X e#u pP)Y5\(AUMS1,Ff+;jqkD{7Q]ַ\Ob{*̡_tgz"Pc 'l0~F"6=oEa~3LOaZV.#t04<+.rB ^pT|Iɬ&PP `܈Whs[P-^4) QR*]tie$qD7{C+q\Obc[Wtgzܭsd }a&O0,N(ڐ `f %vxY~m1v=htlILU"WخOa4T':3 lyPLc?RFKQ~d:Wj t|oYڮ{X@ɼ]uH`#Ԅǥf%sߝN%~J13+] xj(I "iU_t4'6:"mL3 I?NR+ؒK;j=~۩1|v{UQ݇F &u ~ž*~UV` F h!I;- .EK]$wO ]# diBu ;'T6Sj料l]%k۱TwIɪۏe)@s SIMPM.CODEdSYSTEM.LIBRARY/rQSYSTEM.STARTUPt SYSTEM.APPLEd^%pGv)DS(,MX|Y,2&eBqDR J}ИC(\Obn[Tcgz9sHAzX%ڋ&݌0գ6S`A10133T DUS.DATArd NES.DATAv* PRO.DATAfd4MSG.DATAfd45SYSTEM.MISCINFO®5R SYSTEM.PASCALd\^SYSTEM.CHARSET;^n USTRT.CODEdns IDENT.CODEdPM1DH AT30E0T1gCoie,l5eo 9heuts 5 4n,ro3Prog b.kA5B nob/r &꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xH&x'8*7Ixix&&  ') + &п x) ++`FG8`0($ p,&"UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU) (jJJ>L+ "?I>  N `  ` x V Nx .x- z `V0^*^*>` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&kywCgx$}(.ᅴ?P@.F8kοQJX!64ktudentdentf Acade;X}ot%!=UY-ib rqb AϹuuAy 0q di!CeExecute**vvʡ A1013 MasterR(TREES)mic AffairsUS67,b`-D5b=<bc|bcxkS4.S4xS1KfS0S}&U&.bI+3bgG4S6U)@?S$DU'{kLSzWSS[SF000009Z23330axi+bxj+cxkxi parts). s F000005Z23330axy+byz+cxyxi parts). s F000007Z29330axi+bxy+cyi+dxyarts). s F000005Z23330ax+bxi+cx+d+exiarts). s $44 0 23456 ;20+bxi+cx+d+exiarts). s "To subtract terms in parentheses, s we must subtracber parts). s Remember, px-qx~=~(p-q)x. parts). s F001102523000ax-\a+b\x)x. parts). s F001101923000axy-bxy\x)x. parts). s F000002923330ax+by-cy+dx. parts). s F000002923330axi+bx+cx-dxi parts). s $14 0 23456 :20i+bx+cx-dxi parts). s p-q)x,p-qx+bx+c)+(dxj+ex+f)ses $2 16 (p-q)x,px-qxbx+c)+(dxj+ex+f)ses For example, 5x = 8x-3x.(dxj+ex+f)ses $54 0 23456 :20 = 8x-3x.(dxj+ex+f)ses Terms with the same variables x+f)ses are subtracted by subtracting x+f)ses $their coefficients (numtheses F000001923000a+(bxi+cx)+(d+exi)theses $14 0 23456 :20(bxi+cx)+(d+exi)theses F000001925000(axi+byj)+(cxi+dyj)heses F000001923000axi+(bxj+cxk+dxl)j)heses F000001923000a+(bxi+c)+(dxj+e)j)heses "F000001923000(axi+bx+c)+(dxj+ex+f)ses $1 06 (bx+cx+d+dxkowers first. Expressions in parentheses wers first. &are added by removing the parentheses and adding the separate terms. theses F001001923000ax+(bx+c)e terms. theses F001001923000(ax+bx)+cx terms. theses F000001923000(ax+b)+(x+d)erms. "Terms with powers of one variable es, 'are arranged with higher powers first. F000002923550a+bx+cx[2]r powers first. F000002923550axj+b+cxi+dxpowers first. F000001923550axi+bxj+c+dxkowers first. F000001925550a+bx+cx+d+dxkowers first. $44 0 23456 :20the variables, cannot be combined. f the variables, F000002925000axi+by+cxj+dy variables, F000001923000axi+byj+cxk+dylariables, F000001923000a+bx+cy+dxk+dylariables, F000002923000ax+bxy+cxy+dxylariables, $34 0 23456 :20+bxy+cxy+dxylariables, 922000ax+x. appears, nt 1. <F000001522000x+bx. appears, nt 1. <F000001322000x+bx+axappears, nt 1. <F000001325000axi+xi+bxiears, nt 1. <$44 0 23456 :20i+xi+bxiears, nt 1. < Terms with different variables, 1. <&or different powers of s). <F001102923000axy+bxyp+q)x. parts). <F001102923000ax+bx+cx+q)x. parts). <$44 0 23456 :20+bx+cx+q)x. parts). <$We usually omit the coefficient 1. <When no coefficient appears, nt 1. <we assume it is 1. appears, nt 1. <F000002 = 3x+2x.any order. <Terms with the same variables der. <are added by adding variables der. <$their coefficients (number parts). <Remember, px+qx~=~(p+q)x. parts). <F001112923000ax+bx~(p+q)x. parts). <F000002923000axi+bxip+q)x. part $2 18 x+y,y+xm/3Wy[L?Ry K<#Numbers can be added in any order. < $1 08 x-y,y-xe added in any order. <$1 06 (p+q)x,p+qxded in any order. <$2 16 (p+q)x,px+qxed in any order. <For example, 5x = 3x+2x.any order. <$54 0 23445 :20E3M`E3J1GbbG<hb_IiSmUikvUU7zU-C6bl~b,o4S!-[S^7SOUnWDMSLS(0S"f5SUM`t each term heses, s by changing its sign. term heses, s F000001923331ax-(bx+cy)erm heses, s F000001923331ax-(by+cz)-(dx+ey)s, s F001001923330(ax+b)-(c+dx)x+ey)s, s F000001923330axi-(bxj+cxi)x+ey)s, s $34 0 23456 :20i-(bxj+cxi)x+ey)s, s We normally simplify inside ey)s, s !the innermost parentheses first. s F000002923531ax-(b-(cx+dx))irst. s F000002923531a+(bx-(c+dx)-e)rst. s F000001923531ax-(by+(cx-dy+ex)). s F000002923531a-(bxj-(cxi+dxi))). s $44 0 2[2]+b)(x[2]+cx+d) term F000001523330(ax+by+c)(dx+e)x+d) term $13 0 11223 :30x+by+c)(dx+e)x+d) term F000002922051(ax+b)i-a(x+b)ix+d) term #F000001323331(x[2]+axy+by[2])(x+cy)rm F000002523331(x+a)(x+b)-(x[2]+c)cy)rm $13 0 33445 :30+a)(x+b)-(x[2]+c$44 0 12233 :30xi-byj)(axi+byj)eses. Remember to multiply each term eses. &in the first parentheses by each term in the second parentheses. each term F000001523331(x[2]+ax+b)(x+d)ach term F000001523330(x+by)(cx+y+e)d)ach term F000001523330(xression eses. of the form a-b by a+b, ession eses. the middle term is always 0. n eses. F000002925500(x-a)(x+a)ys 0. n eses. F000002925500(ax+b)(ax-b) 0. n eses. F000002925500(ax+by)(ax-by). n eses. F000002925500(axi-byj)(axi+byj)eses. 3456 :30x+b)(cx+d)d. , heses. F000002923331(xi+a)(xj+b)d. , heses. F001002923331(ax+b)(cx+d)d. , heses. F000002923331(ax+by)(ax+by) , heses. F000002925331(axi+bx)(cxj+d), heses. $44 0 23456 :30xi+bx)(cxj+d), heses. When we multiply an expeses. must be multiplied rst mials, heses. by each term of the second. , heses. F001002923331(x+a)(x+b)ond. , heses. F001002923331(x+a)(y+b)ond. , heses. F001002622051(cx+a)(x+b)nd. , heses. F000002522051(ax+b)(cx+d)d. , heses. $14 0 2 expressions +e))l)es . in parentheses, we multiply +e))l)es . &each term in the first parentheses by %each term in the second parentheses. $54 0 23456 :30e second parentheses. When multiplying polynomials, heses. each term of the first mials, hF000002523330a+b(x+c(x+d))+f)+fxl)es . F000002523050ax+((bx+c)dx+e)fxfxl)es . F000002523330a(x+b(x+c(x+d)))xfxl)es . F000002523330axi(bxj+cxk(dxl+e))l)es . $1 05 (p+q)(x+y),px+qyxk(dxl+e))l)es . $5 14 (p+q)(x+y),px+qx+py+qy+e))l)es . To multiply twozl)axymx), es . $14 0 23456 :20xj+cyk+dzl)axymx), es . F000002925330a+b(x+c)+dzl)axymx), es . F000002925330ax+bx(cx+d)l)axymx), es . "F000002925330(axi+bxj)c+d(exk+fxl)es . F000002925330ax(bx+c)+d(ex+f)+fxl)es . $14 0 23456 :20(bx+c)+d(ex+f)+fxl)es . 923330axi(bxj+cx). ed ses, es . F000001923330(ax+by)cxx). ed ses, es . F000001923330(axi+bxj)cxk ed ses, es . $13 0 23456 :20xi+bxj)cxk ed ses, es . F000002924330axi(bxk+cyn) ed ses, es . F000005<24331axi(bx\j+k\+cxj+dx), es . F000002<25331(bxj+cyk+dheses . $54 0 23456 :20side.m in parentheses . "To multiply terms in parentheses, es . each term must be multiplied ses, es . by the term outside. iplied ses, es . Remember, p(x+y)~=~px+py. ed ses, es . F001102523330ax(bx+c)+py. ed ses, es . F000001jykbxiylponents. ally. F000002525551axibxjcxklponents. ally. $1 06 p(x+y),px+yxjcxklponents. ally. $4 16 p(x+y),px+pyjcxklponents. ally. "To multiply terms in parentheses, lly. %we multiply each term in parentheses . by the term outside.m in parentF000002523551(axy)bxyiplication. ally. F000002523551axy(bxyz)cyzcation. ally. $33 0 23456 :20y(bxyz)cyzcation. ally. Powers of the same variable are ally. multiplied by adding exponents. ally. F000003935551axi(bxj)exponents. ally. F000002925551axalphabetically. F000002523551x(ay)bv)d alphabetically. $43 0 23456 :20ay)bv)d alphabetically. Variables are multiplied phabetically. by using exponents plied phabetically. !to show repeated multiplication. ally. F001002523001ax(bx)ltiplication. ally. 3456 :20(bxj-(cxi+dxi))). s !Products of terms are simplified s "by multiplying the coefficients. s 'Variables are arranged alphabetically. F001102523551ay(bx)ged alphabetically. F001102523551(ay)bxzed alphabetically. F000002523551azxwy(b)d )cy)rm F000002937000(xy)i(x+b)-(x[2]+c)cy)rm F000002525000(ax)i(x+b)-(x[2]+c)cy)rm F000002525000(axy)ix+b)-(x[2]+c)cy)rm $33 1 33445 :30xy)ix+b)-(x[2]+c)cy)rm A power of a product b)-(x[2]+c)cy)rm 'is the product of the separate powers. F000002937000(xy)ithe separate powers. F000002525000(ax)ithe separate powers. F000002525000(axy)ihe separate powers. $13 1 33445 :30xy)ihe separate powers. F000002534000(xi)jihe separate powers. F000002525000(axi)jhe separate powers. F000002925001(xiyj)ke sis the same as the first.using these values of the variables.g"These expressions seem equivalent.e first.using these values of the variables.g'These expressions are not always equal.st.using these values of the variables.g'To draw the xygraph we join a value for each variable. above using these values of the variables.g)Now you choose a value for each variable. using these values of the variables.gNHere is the value of the above expression using these values of the variables.g*The second graph g*When the cursor returns, please try again.ey..CODE1α.TEXTGԱ[ڱ:mgNEvaluate the expression in the box above using these values of the variables.gHere is the correct value. the box above using these values of the variables.g"Here isڱ:mgPress [#-arrow] to $.ete your $.inator.e.s.ı.CODE1α.TEXTGԱ[ڱ:mgPress the "#" key. $.ete your $.inator.e.s.ı.CODE1α.TEXTGԱ[ڱ:mg-Hold down [CTRL] while you press the "#" key..CODE1α.TEXTGԱ[ڱ:mXTGԱ[ڱ:mgA right parenthesis is needed.ression.se.s.ı.CODE1α.TEXTGԱ[ڱ:mg'Use [CTRL] D to start your denominator.e.s.ı.CODE1α.TEXTGԱ[ڱ:mg Use [CTRL] # to complete your $.inator.e.s.ı.CODE1α.TEXTGԱ[DE1α.TEXTGԱ[ڱ:mg!No negative numbers here, please.here.se.s.ı.CODE1α.TEXTGԱ[ڱ:mg$We multiply here (no mixed numbers).e.se.s.ı.CODE1α.TEXTGԱ[ڱ:mg&Press [RETURN] to end your expression.se.s.ı.CODE1α.TEses.ı.CODE1α.TEXTGԱ[ڱ:mg&Please press [left-arrow] or [RETURN].eses.ı.CODE1α.TEXTGԱ[ڱ:mg)Just one number or variable here, please.s.ı.CODE1α.TEXTGԱ[ڱ:mg&Please type just a single number here.se.s.ı.COspaces.theses.ı.CODE1α.TEXTGԱ[ڱ:mg#No expression close is needed here..theses.ı.CODE1α.TEXTGԱ[ڱ:mgNo variables here, please.ded here..theses.ı.CODE1α.TEXTGԱ[ڱ:mg I can't use that character here.re..thelarge.needed.al point.d.ı.CODE1α.TEXTGԱ[ڱ:mg#This expression is too complicated.point.d.ı.CODE1α.TEXTGԱ[ڱ:mg+The preceding expression needs parentheses.ı.CODE1α.TEXTGԱ[ڱ:mg$Constants should not contain can have only one decimal point.d.ı.CODE1α.TEXTGԱ[ڱ:mg)A number cannot end with a decimal point.d.ı.CODE1α.TEXTGԱ[ڱ:mg A complete expression is needed.al point.d.ı.CODE1α.TEXTGԱ[ڱ:mgThis number is too )l}ԱڟddααEı.CODE1α.TEXTGԱ[ڱ:mg'Help requested. Please press [RETURN].αEı.CODE1α.TEXTGԱ[ڱ:mg+This expression is too long or complicated.ı.CODE1α.TEXTGԱ[ڱ:mg)A number $14 2 33445 :30iyj)kxponents. ed wers. F000002623550(x+a)ikxponents. ed wers. F000002523551(axyz)ixponents. ed wers. F000002925550(axi+b)[2]nents. ed wers. F000002525550(axiyj)k2]nents. ed wers. eparate powers. $33 2 33445 :30iyj)ke separate powers. !A power of a power is simplified wers. by multiplying the exponents. ed wers. F000002535000(xi)j exponents. ed wers. F000002525000(axi)jexponents. ed wers. F000002525000(xiyj)kxponents. ed wers. its points.st.using these values of the variables.gHere is how xy is plotted.n its points.st.using these values of the variables.g We cannot plot xy on the screen.points.st.using these values of the variables.g,Find xy using arrows^v. Then press [RETURN].ing these values of the variables.g$, then the value of this expression RETURN].ing these values of the variables.g&Please type a number between -# and #.TURN].ing these values of the variables.gAll right, that's close enough. and #.TURN].ingtors so that monomials precede polynomials.her parentheses..r.es.gCThe difference of the squares of a and b is factored as (a-b)(a+b).eses..r.es.gMRewrite the middle term by factoring the product of the first and last terms..g=Three terms can sometimtiply monomials by multiplying coefficients and combining variables.2.r.es.g:Multiply each term in the parentheses by the term outside.ng variables.2.r.es.gHMultiply each term in parentheses by each term in the other parentheses..r.es.g8Rearrange faces.gSubtract by changing signs.n by removing parentheses.on factor. first. 2.r.es.g&Add a negative quantity by subracting.ng parentheses.on factor. first. 2.r.es.gRemove unneeded parentheses.ubracting.ng parentheses.on factor. first. 2.r.es.gGMulirst. 2.r.es.g?Make the first term positive by removing -1 as a common factor. first. 2.r.es.g(Rewrite the power as a repeated product. -1 as a common factor. first. 2.r.es.g5Add parenthesized expression by removing parentheses.on factor. first. 2.r.ponents.xponent 2.r.es.g@Combine similar terms (terms having exactly the same variables).ponent 2.r.es.gFRearrange terms so that those with the higher powers of ^ occur first. 2.r.es.gRemove common factors.t those with the higher powers of ^ occur fstandard position.tical order.es.gIAn expression times itself is written as a "square" using the exponent 2.r.es.g?Powers of the same base are multiplied by adding the exponents.xponent 2.r.es.gAdd or subtract.me base are multiplied by adding the exes the negative of the expression.ariables.gKWrite each term with coefficient first and variables in alphabetical order.es.g?Combine signs if possible, and move signs to standard position.tical order.es.g Multiply.igns if possible, and move signs to by 1 gives the original expression.of the variables.gEMultiplying an expression by -1 gives the negative of the expression.ariables.gOmit zero term(s).ression by -1 gives the negative of the expression.ariables.gCompute power(s)..ression by -1 givto the power 0 is equal to 1.y.g these values of the variables.g;The first power of any expression is the expression itself.s of the variables.g'Any expression multiplied by 0 gives 0.e expression itself.s of the variables.g=Multiplying an expressionrm standard polynomial simplifications.y.g these values of the variables.g$Rewrite expression in standard form.cations.y.g these values of the variables.gSimplify term(s).n in standard form.cations.y.g these values of the variables.g,Any expression .g,Type only letters from the given expression.y.g these values of the variables.g Start with the given expression. expression.y.g these values of the variables.gThis problem is finished.ession. expression.y.g these values of the variables.g,Perfo variables.g%These expressions are not equivalent.parately.g these values of the variables.gThat seems correct so far.equivalent.parately.g these values of the variables.g#This expression is too complicated.t.parately.g these values of the variablesues of the variables.g$Your simplification seems incorrect.eparately.g these values of the variables.g!This equation is too complicated.ct.eparately.g these values of the variables.g$ is not used in this problem.ed.ct.eparately.g these values of the these values of the variables.gAn equation needs an "=" sign.. and #.TURN].ing these values of the variables.g%Replace @ by your numerical solution..TURN].ing these values of the variables.g.Simplify each side of the equation separately.g these vales be factored in the form (a+b)(c+d). and last terms..g/Remove common factors from two terms at a time.rm (a+b)(c+d). and last terms..gDFour terms can sometimes be factored using ac+bc+ad+bd = (a+b)(c+d).st terms..gBCompute a power of a product by raising each factor to that power.).st terms..g8Compute a power of a power by multiplying the exponents.hat power.).st terms..gMRewrite a polynomial so that its terms match the terms of another polynomial..g#Remove parenthesized common factor.rms matc for the number zero.o draw an arrow of length zero.ult is zero.@.on.gTherefore, its length is about draw an arrow of length zero.ult is zero.@.on.g*An exponent means repeated multiplication.row of length zero.ult is zero.@.on.g2(When the exponent &have no operation symbol between them. (*).cause the two numbers .). -1).@.on.gIHowever, this addition is repeated zero times, and so the result is zero.@.on.g=A dot or a small "x" is used to draw an arrow of length zero.ult is zero.@.on.gIt stands).@.on.gC(In general, any multiplication using 0 always gives the answer 0.). -1).@.on.gAThis expression requires multiplication, because the two numbers .). -1).@.on.g+are separated by a multiplication sign (*).cause the two numbers .). -1).@.on.gation.. -1).@.on.g3Replace @ by the numerical solution obtained above.ns.oss.equation.. -1).@.on.g)These equations have different solutions.ned above.ns.oss.equation.. -1).@.on.g%Sorry, not enough room on the screen.ons.ned above.ns.oss.equation.. -1ns.oss.equation.. -1).@.on.g3 to have the same solution as the earlier equation.ns.oss.equation.. -1).@.on.g&Now let's resume solving our equation.ier equation.ns.oss.equation.. -1).@.on.g/ The solution checks in the original equation.ion.ns.oss.equsolutions.ns.oss.equation.. -1).@.on.g%So the solution is approximately @ = no solutions.ns.oss.equation.. -1).@.on.g'These lines meet somewhere off screen, o solutions.ns.oss.equation.. -1).@.on.g3so the solution of this equation is off the screen.or @:for @ in the original equation.. -1).@.on.g:Here is the approximate value of @ where the graphs cross.equation.. -1).@.on.g6The graphs are identical, so there are many solutions.oss.equation.. -1).@.on.g3The graphs are parallel, so there are no ys true, so @ can be any number.as no solution. -1).@.on.gC check by substituting the solution for @ in the original equation.. -1).@.on.g$ solve the following equation for @:for @ in the original equation.. -1).@.on.gWe graph each side of quation fsign of each side of the equation (multiply both sides by -1).@.on.g5Multiply both sides by the denominator(s) and cancel.y both sides by -1).@.on.gDThis equation is not true, so the original equation has no solution. -1).@.on.g5This equation is alwaranspose a term to separate terms containing @ from terms without @.tself.on.gKSubtract a term on each side to separate terms with @ from terms without @.on.gFAdd a term on each side to separate terms with @ from terms without @.ut @.on.gIChange the .ion.g>Divide fractions by inverting the denominator and multiplying.ancellation.ion.gEDivide both sides by the multiplier of @ to prepare for cancellation.tion.ion.gKDivide both sides by the multiplier of @, and cancel to obtain @ by itself.on.gETmultiplication.g)Rearrange terms to prepare for factoring.r parentheses to show multiplication.gJFactor and simplify numerator and denominator to prepare for cancellation.ion.g>Multiply fractions by multiplying numerators and denominators.ancellationor and denominator.tor...gPerform the division.tor by changing signs of numerator and denominator.tor...gReplace variables by numbers.hanging signs of numerator and denominator.tor...gNReplace variables by numbers, with dots or parentheses to show h the terms of another polynomial..gICancel monomial factors common to both the numerator and the denominator.ial..gLCancel a polynomial factor common to both the numerator and the denominator...gHSimplify the denominator by changing signs of numeratis 1, only 1 factor is needed.)ength zero.ult is zero.@.on.g/Any non-zero number raised to the 0 power is 1.d.)ength zero.ult is zero.@.on.g*Division is the reverse of multiplication.is 1.d.)ength zero.ult is zero.@.on.g%since 0 times any number is always 0.tion.is 1.d.)ength zero.ult is zero.@.on.gKSince 0 times any number is 0, we have no way to select one correct answer.on.g$(Division by 0 is always undefined.)ve no way to select one correct answer.on.g2(In general, dividing two numbers whose  0& "ˡ  J   00áQP 0á0 é000+-Í- šš që  N "ˡ )á á áaˡ á Nšá áÄ& ܟˡ0  צSYSTEM FAILURE NUMBER  צ. PLEASE REFER "TO PRODUCT MANUAL FOR EXPLANATION.  DFCOPYRIGHT 1979,1980,1983-1985 APPLE COMPUTER, INC. ALL RIGHTS RESERVED~   v DjPASCALSYUSERPROGFIOPRIMSPRINTERRINITIALIGETCMD SYSIO d, stored in a retrieval"system except as an essential step'in its execution, or transcribed in anyBrooks/Cole Publishing Co. 555 AbregoMonterey, CA, 93940, Student diskLicensed for use only at%Please respect the license agreement. Published by BrnP6 V >DPژZ   O ?"¨n6 r P  ^  All rights reserved.No part of this program may be!reproducemultiplication by right of the "base" g subtracted, umbers..g&However, it does not mean the same as ght of the "base" g subtracted, umbers..grall result is that we moved by each number being subtracted, umbers..g8(However, you may see a shorter way to do this problem.)g subtracted, umbers..g8, which is written above and to the right of the "base" g subtracted, umbers..g#, means repeated gIn this problem, we change bers.sign of each number being subtracted, umbers..gLet's start from 0. change bers.sign of each number being subtracted, umbers..gSince we started at 0, nge bers.sign of each number being subtracted, umbers..g'the ovenumbers..g*so the answer is 0, and no sign is needed. longer" number.hs" of the numbers..gFWe can subtract by changing the sign of each number being subtracted, umbers..g and then adding the new numbers.sign of each number being subtracted, umbers..s" of the numbers..g:The sign of the answer is the sign of the "longer" number.hs" of the numbers..g&In this problem, the longer number is the "longer" number.hs" of the numbers..g+In this problem, both are the same length, longer" number.hs" of the n expression is undefined.)n.g:Adding or subtracting 0 leaves the other number unchanged.ion is undefined.)n.gHTo add numbers with the same signs, we add the "lengths" of the numbers.ed.)n.gMTo add numbers with opposite signs, we subtract the "length signs are elect one correct answer.on.g+(0 divided by any number except 0 gives 0.)ns are elect one correct answer.on.gL(Remember to hold down [CTRL] and type "U" when an expression is undefined.)n.g)We add zero by moving a distance of zero." when a009ȄX 000á'$á 009Ȅ00 qS\  ɡ'áצ-32768 ^ 逫-ġ>00ń0ˡ ɡa áá0š  %4ȡáۂۂەߓh  ! "ˡ ɡ!  ! "ˡ ߡ š  ńá4 á,á" r 2ب"́$ʁ$ ʁ$ ʁ$ ʁ$ʁ$!"ʁ$ʁ$ʁ$ʁ$FZ   ނ ń! áނ š   šš$ !۞   ġނš  šš!۞ۂۂەߓS  ! "ˡ.! "ˡ ߡ  šۢ ::87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PR P:NEWC/C.CODE:6REMOUT8PSb.:=b4/#b:a@:%aF:`L!I`R[/`X)`2 4j P:NEWC/C.CODEDEDEKYKK.2 4k/P/NEWC/C.CODE.CODE  /IF/E .gEH87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8E/KY Kh Pt.PE87CONSOLE187CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8P IYIL: P/.P> #&á &'"&㓶℡'á.0:'i0&lhhhh 0 鹿HHHHL 0 L8hhL)Ҫ0 `Fff LMMAXINT H   ^ $?š?ˡ?ء "ˡ%ߕނ߂ɡ F b%ⓡ4"צˡ䓡 &ˡ& öÍ# !!  # 0"ˡ4$ š F#,á1š ġ  #.+á$š ġá *   šˡ 퓄 Ä퓡x š   ɍM   "ˡ.ˡ   d쓡  ɚ V %ɡšɡš  V#&ˡ # #6"'ȡ2 š:X f Ą ɡ 낫š ꓡ!š땫Ě@%"á1ꓡ삫Ú š K%"á61*ńȄ4šáRתPńȄ ,ń.áš蕿@šQá1á$   Q lPš蕫š 쾿  /P nȡ " * ==>??? @ A:AvAAABXCCC(D$:\DlD>tX'#ޣ˄ ߢ  ߢ ۤ ߢޣ ޣߢ ޣޢ ޢۤ ޢ áޢá צޢޢޢ8 ́$ʁ$ ʁ$ ʁ$ ʁ$ʁ$!"ʁ$ʁ$ʁ$ʁ$FZ   ނ ń! áނ š   šš$ !۞  /IF/E .gEH87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8E/KY Kh Pt.PE87CONSOLE187CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8P IYIL: P/.P> پ$ò$ÄiȡXP  ٲD)؞D)ؿ؂پáپ$áڸB BBi  ȡؾaġ زؾ $ 2dd;"ákt ȡl q٤ ٤d~ تPdd"á!?kt"á  dRZ پá bޢ ȡUڤ ˡB?Ȅ-ܢ0ۤ ݢ`ڤá \zڨ  ȡ0ޤˡ ߢ`ޤ7 V !!P!x!P &(.Bۢڤ ɡ?š2$ˡآڤ á/á*آ*ÍWצ š š۾.ˡצ([šܕ!!(š۾:ˡ١.TEXTת .CODEת!!ȡ)ܾaܾzȄ ܾaAܾ ɡ?š!!Ȅ11)The 128K version of SYSTEM.PASCAL cannot צ(run with the 64K version of SYSTEM.APPLE d<,Dh YSTERM:  ø !צ  תצP@22ˡ'Version 1.3 of SYSTEM.PASCAL cannot runצ&with a non-1.3 version of SYSTEM.APPLE@22 `    p  CONSOLE:ת צSYSTERM: ۶ ضá}۪*SYSTEM.STARTUPתٟá'      צCONSOLESYSTERMצGRAPHICPRINTERצREMINREMOUT[Bfhjl ʀ  ʀ ́Ɓ Ɓ Ɓ   ʀˡ   تٞ&"á ٤ ȡؤצۢÍ ȄۢÍ؞&"á  ʀʀ ʀ ʀ ʀ  ʀʀ̀ʀʀʀʀʀʀʀʀʀ̀́ʀʁȡʀʀ̀   תʀ'*SYSTEM.MISCINFOת; ̀ʀ*ʀ+ʀ,ʀ%2 &̀ʀʀʀʀ%̀̀́ʀʁȡʀʀ̀ʀʀʀʀʀƁ/@š4SYSTEM.CHARSET+ \٢ š٢ ٢٢ 4$  /   d::87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PR P:NEWC/C.CODE:6REMOUT8PSb.:=b4/#b:a@:%aF:`L!I`R[/`X)`2 4j P:NEWC/C.CODEDEDEKYKK.2 4k/P/NEWC/C.CODE.CODE"áFLIÄ*LIBRARY FILES:ׯ d ?kt d ;.2> 22š$2.CODEׯ 22 š22 ;.:2צ.LIBP۪PB? Ƃ;P Bń"CB̃CʃȡDC) CC Ƃצ*SYSTEM.LIBRARYPƂ ?  ?W ߪPƁ_Ɓ6 PƁ6ƁcƁgƁoƁp ́qƁcʁq! á ݤݚ ˄ܟń ١á  ޤ uš  gá Ä+ޤ  ɡáޤ á ġMáš6 ܂ۻݪ d (   š Í ÄU ǐɄ:ń  šá٢.ٕ۶š ڸ۸۶ š۸ ڸ:   ȡQ  ȡ   ȡ? ȡ  ġ ۢ؂Xڢڢڢڣ ڣ ١ڢ ڣ ڣ١ ڢڣڣ ڣ áڣڣġ ڢڣڣ hڢ ڢ١ڢ!ڣڣ ڢ!ڣڣ ڢÄڣ &ڢ ڣ ڢ! ڢ!ڣڣ ڢڢ ڣڢÄڢ ߢ  d˯7 H  ۣȡڤ  ۣ צۣۢ0H ܣġ ۤ ٤ ڨ ܢܣ*@ۢۢۢۢٚÍۢáۢɡ ۟ۢ`ݤW ˡ!  ,ߓ$ ޓ "ߓۄ,ݤ ߓÍߡ2ݤ š˄ڶ a3 d ޓ(ݤ ߢܯ"á  ܡ:" áܡ ܓת$ ڟšx#ńF 09Ȅ ᾂ0 ߓńȄޓޓ!ܲݤߓÍߡFۤ ōɍ ō ȍ  dč ܓܡߢ ܓߦתߢޢ!ޢ!9 L ٤ Íܡ~  , Ąܓ7צ.INFO$.GRAFׯצ.FOTO /T ڤáޢܡ ޢޢޢÍÄޢÄȄĄMȄt߷iȹ22ȡ2š5252á4w4]11á4\1šV42233039Ȅ 3042221421Ä2*á444ń55P.TEXTׯ]צ.CODEJ.BACKׯުPצצ22ȡ5233 ȡ 23a3zȄ 23aA22š*áݲ%áݲצ:22ȡáݲ 2á!2ȡ5252š[22š22.STARTUP š0l^d, MPILER RFORTRAN: 4  is not version 1.3ړ2Ɓr Ɓr2Ɓ2Ɓŕwʁw?ȡ%Ɓ2ʁwƀʁwʁẃwƁs ƀƁs  22Ɓ_'}   á/)צ*SYSTEM.ATTACHáá(*SYSTEM ת "ˡ ܡ́xˡ2"ˡڡsƀ ˡfSYSTEM.COMPILER RFORTRAN: 4  is not version 1.3ړ2Ɓr Ɓr2Ɓ2Ɓŕ lܟ˄ݤ צ   ١  n ١ á9 ٓ/! !!١ ˡ) ! 䚹 9U[2˄ޢߢšáޢ ޣ ߢ  dޣޢޣ ޣߢ  dÍÍޢˡ ݓۤ er to the Algebra Mentor١Instructor Manual orצStudent Workbook for Rl(-٨تP.//P00ġ lesson/e0ڕ.ZD* #CONGRATULATIONS. You have completedall the lessons in this porration צ student diskġ ئf .(צin driveצ and close the door.&تPR צ'צThis disk is assigned to  8צ#04:P 0 0&'تP Ref&$ء צESC$!á  "%Versiond.d  * צ & š"STUDENT DISK #ئ NEEDED.Please insert ɡ any צAlgebra Mentorá!š non-צ demonst @ ""F#ڨ&_# #" 0!  ,٪PتP&,Press [] to continue.>$تPRETURN$+! T* Pۡo! ?צPZ"ٹPlease Then  #צ!hold down the [CONTROL] or [CTRL]צ$key while you press the [RESET] key.ء لء  /ˡ8ء &<   r d ۡo s  sp..//P0.áDisk is write-protected.צ System error. o!X O:%%,}  t 쥁f!ڢ!ؓ!ޢ Äޢɷޢ÷s%.......ת ۢ" INTROׯÄ0ܣ%'&`'l_ 6yG ݣשnn Dnn$T: -š2 .2 2  2oy/ 5 dN  3  $ &0`S9ڥۂ4 7a:0=U#; EMv5Ȭ٩nx]}8T* SYl5ߢP٩n]ŀȀˍˀ2#"eޣ{ɍ#select a different lesson.lesson titles.(צ For lesson, just press [RETURN].LESSON ( toצ) ? "  10ġɡ ݂0š  áښݓa fƁƁ"šʁʁōʁʁP܍ʁÍʁʁ ŴʁʁȄʁʁƁ!.ܓf - צYou'll now do lesson number,צ%unless you ous record of thisstudent (Y or N) ?"ڳ@@NnÍ- 0ۡ l/ܶ ލ0ݍݡ,ۡ lצX, ad kݓlcz..ĺʁṔ)adɩl"ák!* 2,lڢP ZY٢٢٢š٢ ٢Ŷō< v/lۢׯThis disk belonged toۢ'May I erase the previice problems on this material.ǰ b'SYSTEM.STARTUP.תPa'צPlease return your disksצto your instructor or tutor.  To run another program,insert the appropriate disk.pV Fn this portionof the course.áY&However, this demonstration version isצ'much shorter than the complete version.adYour next lesson will be*Then you'll return to*!˥bDinstruction and(#practتP Refer to the Algebra Mentor١Instructor Manual orצStudent Workbook for Rl(-٨تP.//P00ġ lesson/e0ڕ.ZD* #CONGRATULATIONS. You have completedall the lessons i&$ء צESC%"á  "&צVersiond.d  * تPR צ'צThis disk is assigned to  8צ#04:P 0 0&'8 @ ##F$ڨ&_$ $# 0"  ,٪PتP&,Press [] to continue.>%تPRETURN%+" T* /Pۡ k!!;תPZٹPlease Then  #צ!hold down the [CONTROL] or [CTRL]צ$key while you press the [RESET] key.ء لء  /ˡ!ؓء%8!n ` ۡk o  ol..//P0.ʷB `^ph.CODE.CODEACKE.CODE1.TEXTG[:mƳgEʷצThus, צand צare not always equal.HצThus, it appears that~~~~~)Pצ = P)PQ   ^צfor all values of R ݓEn á ۢ ۢښؚۢ8ٟˡ= # á ڢ J ٶ/Ä١  ١áz% ˡ(+ܢ -ܢ ޢޢ ݡ!:*Úۚ.á:&ߢ!  ߢ!ߢ & τٚښ @áء ߢ ߢ Cš ašaaań*áخ% %٤ ٤ܢ  ܢ , ܢ ܢ <#*á .á ##6 @á ۢ @{Η($ )$@{Η  $L.á *á 4š$ڡ 4 Vښ,ڕ+ɡڕ ,  ؟ˡ á$ @áܢ @܂ ߝۂ  !ؕ!3؂؂ R"ˡ!"" :ܢܢ"ɡڑۍ ڟˡڨٚ,ō zݤaڤaܤaۤaߓaɍ? Jߢ ڂ ۂ ܂ ݡڂۂ܂ݡߝ $ 6n "SIMPMAINTHELP TINPS TOUPS TSIMP INITPROBENDSIMP SEGPROC    rI|j& Q    RH  ȡڥ  ' V ٪Pצ~~~~~~إ),-,á  ^צfor various values of Vl!Let's investigate the expression Let's compare this withY d O ɡf تPצ ~~~~~~~~~Q    RH  ȡڥ  ' VتPQ 2@**-*-***-****-+*+****-**-*******-*******+++,*,-*----------**+++-RnتPצ@a,z-,-ȡ.,ašצ , , ,,.צQVl 2$.آɄآÄ  צ These are  צnot צequivalent expressions. ȡ)ÏÏš,mƳgEʷ T(؟ˡ''á((*''ۡ//00ȡi/۾11@ɡ"1ڤ1(š1ڤ%1_ȡ1/*1@1@ڤܚܚu^ @٢٢&)ۢ ۢ))(dٹELC:á*á  ڢڢMF?8|+ٟˡ *áخ**-Íٮ**@ȡۤ%  ńNޤݤ ܡޤ ؓؓHB& بš aޤaš  dڲ ؟ˡW.áF٢2ȡ   d ˡ"ء áݢ ݢ  /c ((2ߡ(  ** +- ߄ ڟˡV١ۢۢءۢۢ /áخخġ. .     /   ؗٲزخ& 'ڮÍܢܢڗ' T؟ˡ  *  ˡ ˡ @aޓޓ  3ۓ Õ4ۓšܕܕ(*5ܓ ٨ۡڢ% 6ڕÄ ۢݤڡÄpܢޤ Ä݂2D 3š6Ä%ڡۢݤ5ۢݤ4  6ۣ!Ʉٓۢ! !!á)) >bB ` 4 (:F`T|f Z J  4Ld$Dl6Íޓޓ  3ۓ Õ4ۓšܕܕ(*5ܓ ٨ۡڢ% 6ڕÄ ۢݤڡÄpܢޤ Ä݂2D 3š6$ $ $ Ä*!!ݓٓ!!*ˡ'> ~2 áݤ ܤ ܤ ޡ8Ä ܤ áߡ ߯Í  1 azȡ/aaš aaaÄ8& ݤߢ ؝ܤ ۤ á ߢ ߢ az ȡ%aڝܤaٝۤa, | ۤڤqתP@0qqݤrrrš q!/rq!rrġCqܤsstsš(s0ás.ss.*,Q ۀڀˡ ێ (1ڤۤɡ /az ȡ1ašءڏ,ފ.ؓڊ.*,9 \ġ9ڤ -+á,ە,ɡ,J b0ڨ٨תP@/0" +:*+!*/ a*+)*۟* צ Pٿ,ۣ),ۢ*ۣ)@ۢ)ۣ)*- -.,.-ɡ,؊. /ۤ+y+i@؟ߡ -Íߡޡ+ޡ آ +++ ++á + +s+'+ߗzšá   ˍ#ɡ#*#*#*aݤ#*aɡ.ݤݤáákeD؟ˡ  ˡ=ٟˡ0      ߕń   ߕńńˡ$*ˡ -Í ( ؟ˡ\*á+ڢظٸ*ˡ ق! ٕá łáܶ " ڡٶܓܮڄH!azȡ/aaa; r# # ö@á !ł   Zš+ȡݤޢڕ l ! ߄ܮfڡܶߓ߮ڄNP@-ٕnnánnn*Tآ,(آ*"ġ٢ؤ٢٢ڢڲ< T ڶ ɄٮDᕤ   ߤ  ۝ * ب-ء 4ڕ "nnán׀ġ (ۨݕáXݤ ' ,za a aɍ,H rݨߕá   ÍŚ2 ᕤᕤᕤV š ۍ ءڡ.١!! ⊐١há= ݢ*  ȡ ڶɡ.á. <ܤۤɡ .á#$$$$$$%%%%HڢJ *á؟&؟á ؚ؟ˡ  ݢńݢq+-خ c F >á&ޢá +-ݢܚۢڤ   ȡ ȡ" Ʉ  ߤ  ȡڂڤٚٚD ۟áڟ5ڟá+ Ä@ۢ" ۢ ڢ܍*ˍܱ>ܟˡخߢÍvܮ ÍޡYޡK @ @  áظޓخ } ؟ˡ  Í*Ä*Äc @ بڢٚÄۢ  Í$ .á    jٟˡ`ڟˡ,   tآ*ٚġ ˄    ń  áآ)ݚ h|>`j~(   ߕń   ߕńńˡ$*ˡ -Í ( ؟ˡ\*á+ڢظٸ*ˡ  jٟˡ`ڟˡ,   tآ*ٚġ ˄    ń  áآ)ݚ" ö@Ŷ Ä$ خ خܟخ  ۢš~  ܤ   Ʉ -ܤ ö Ʉ Ʉ+@ š 7b  ٢Ä ˡ F@$%ŶÄÄń.&azȡał%ŶÄݹqrut٫vثw", ܢܢ (ڪ'!.ڶġ ڶ0&dȡ؂š dؗd p*Du qvw Df!ݢjݢjܣ)Äܢ)V8  j㾝  jōÄjP*)+ލ&  )á  i zۨ & H*\. 8ھ{Â}Õá!, ġAؾ{á1-á )( Pe^ pE@9999999999999909090999099999999999999999995393629999999999991119ר @צ Df!ݢjݢjܣ)Äܢ)V8  j㾝  jōÄjP*)+ލ& )á  i zۨ & H*\ 8ھ{Â}Õá!, ġAؾ{á1-á )( Pe^ pE@9999999999999909090999099999999999999999995393629999999999991119ר @צE@.ÄܳD(لܳ,@@{((ލ*Ä.Â)á-D;@á!e@D.˂)}33ġoݾ ܓAܡ@a    \ ١ ײǀؿ*۟ˡ ?ȡ E 9 . /  ۢ/**ۢ*ܢšt.á **  á ** á +- á*á%šĄ$á)á+á/á,á.آ)ܚ(fbXVB L t  & B \ :@>Vbj` 0,؟ˡ //٢ áظ./ آ$ڢٚڢ/80/ٟˡ`00*á ۢ/**ۢ*ܢšt.á **  á ** á +- á*á%šĄ$á)á+á/á,á.آ)ܚ +؟ˡ2 ٢ض ظ--@--ٟˡ,؟ˡ //٢ áظ./ آ$ڢٚڢ/80/ٟˡ`00*ߡߕcah )؟ˡHH+H+H/á H HH&H& á9H & H  š& š.ˡ%*á &H&H(ٶ#'$J %؟ˡ7ǀڢضõظٸ**D**ٟˡ ٢ ٢ ޤ   ááޤ ޢ Ä=  b'ڢ*šبٶآٚɡ3 P(؟ˡ&&%&%&.á& &ض&&O&&&'ū"ū!v ū ūë# wi v˩!"t & &ȡǖ"+ :w ́ʁȡ9 ́ʁ́ʁ ʁ(ƀݪ'!"ZPaźʁȡašvŹʁȡEƀš(1ƀP1Z1Pƀ1'"ƀá ǿ5%$$%Z$Q9z    *áb٪P..%,,,,..,Í./ˡ/ equal sign (or [CTRL] F if finished).?"Sorry, not enough space on screen. ywqwq=V ń#tétڢåie ڢ Ȅ"$Q/ɄˍBk 5$áOáFá35$5Õ١r|$Qj?Íá6عq}yu-Type aneťieōá&&& ɥ&ˍie ڢč iiڢةĄڢń#tétڢåie ڢ Ȅ"$Q/عr 5á35Ed=  ȡz, vwqruts&0vwڢá   ie ڢÍ iˡd ǿ4Type a step.Finished problem.Get a hint.Help needed.צצáiiéb˄iiTũ. ɡ Q$QQ$áii á  Let me help.2 ééiib˄ɍMš7n nnmn  á   ˡ2DJ@  ˡd ǿ4Type a step.Finished problem.Get a hint.Help needed.צצáiiéb˄iiTũ. ɡ Q$QQ$áii  bצ^š^cáf*   Correct. P8+*צThis problem is not finished.+*+*+*V [é"Ä**é"Ý  X^^`: plify factor ˡ:  Here is how we צ Please " Here is the solution.תP"é" R "   eiw& ũ"  n ȡ5ؚ$% aam  nɫ ٩n   nn 2 ,2:when ɡצsimplify factor ˡ:  Here is how we צ Please " Here is the solution.תP"é" R "   eiw& pũ*f azȡ]ašHצ ~=~Pؿš צ, P ɡ: تPPR צ the following expressionPɡ"evaluate á Q O9@**-*-*-*-****-+*+****-**-*******-*******+++,*,**----------*****-Q́ ʁʁ# @"9Pz9    pĩ$Q/ O@**-*-*-*-****-+*+****-**-*******-*******+++,*,**----------*****-.$Q  $Q0 00#-m-ɡ-mmšm\ 2š_   =áצ=  Já?Finished  $Qjצ^6P$Qj =Í  k$ō"áš=  9$$PROCEDURE WSTRING(S: STRING); $PROCEDURE CHARTYPE(MODE: INTEGER); "IMPLEMENTATION X E )4#i JL` T$Q%P)Q I L`#JI`'  I` I0ݩ(0/,",i8i#Hiihifi`i,i,3iPII4ifH8H hIiH CREENBIT(X,Y: INTEGER): BOOLEAN; $PROCEDURE DRAWBLOCK(VAR SOURCE; ROWSIZE,XSKIP,YSKIP,WIDTH,HEIGHT, 8XSCREEN,YSCREEN,MODE: INTEGER); $PROCEDURE WCHAR(CH: CHAR); ` 8`*UH)JJh & & fDURE PENCOLOR(PENMODE: SCREENCOLOR); $PROCEDURE TEXTMODE; $PROCEDURE GRAFMODE; $PROCEDURE FILLSCREEN(FILLCOLOR: SCREENCOLOR); $PROCEDURE VIEWPORT(LEFT,RIGHT,BOTTOM,TOP: INTEGER); $FUNCTION TURTLEX: INTEGER; $FUNCTION TURTLEY: INTEGER; $FUNCTION S $TYPE $ SCREENCOLOR=(none,white,black,reverse,radar, 3black1,green,violet,white1,black2,orange,blue,white2); & &FONT=PACKED ARRAY[0..127,0..7] OF 0..255; & $VAR &FONTPTR:^FONT; $ $PROCEDURE INITTURTLE; $PROCEDURE MOVETO(X,Y: INTEGER); $PROCEتPDŽE  RDŽE ٪P E   (   >6Vz.@~CODE.CODEACKE.CODE1.TEXTG[:mƳgEʷ  تP,,PT  @ \ ܡ@ ܡڡ݂P تPǜE  RCL<<ʷZ\\ʷxR` [E :E BODY3 WRITELINUNITPARTCOMPOPTINUMSTRIN\\ER.CODE1\.TEXTGb[h:mng>ʷB `^ph.CODE.CODEACKE.CODE1.TEXTG[:mƳgEʷ "PROCEDURE SETCHAIN(TYTLE:STRING); "PROCEDURE SETCVAL(VAL:STRING); "PROCEDURE GETCVAL(VAR VAL:STRING); "PROCEDURE SWAPON; "PROCEDURE SWAPOFF; "PROCEDURE SWAPGPON;  IMPLEMENTATION E 2L 8<=>F?A:CGJJLʷ"L(E(c)1987 by John C. Miller; 1983,1985 by Apple Computer; 1979 by UCSD.D < #',1=R DJJN CHAINSTUSHORTGRASHORTGRAGRAFA GRAFA GRAFC CONIO SHOBL STRAP EXMAK ALGIO EVALU AXDRW LINXT TABGR  "%+0;CIMQۢj*á  9 ګr| Qj   á $á @dĄ  QjQj%ũ  s      ,06 ^      Hr&F,xr š=  9$Qۢj*á  9 ګr| Qj   á $á @dĄ  QjQj%ũ  s  Q%P)Q I L`#JI`'  I` I0ݩ(0/,",i8i#Hiihifi`i,i,3iPII4ifH8H hIiH ǯ?Ǭ?ǰ?Ǯ?ǩ? áǫ?Ǭ?0 ٢ؚ ڢؚڢٚ ۚܢښܢٚܢؚɡšܢɡܢǿšܢǿɡܢɡܢ  USES {$U A.LIB}SHORTGRA; CONST "XC=6;YC=10;YCHMAT=8;CHSPACE=2;YRV=184;YMAX=191;XMAX=279; "INFINITY=1E36;ASCMAX=127;BKMAX=15;PLACEMAX=79;LEVELMAX=8;ECON0=64;ECONMAX=95; "VARMAX=7;ALPHAMN=97;ALPHAMX=122;ROWMAX=24;STEPMAX=4;COLMAX=2; "CTRLB=2;CTRLD=4;FTURTLEY 8 SCREENBI5 X 0505Y DRAWBLOCT96l5  SOURCE 555 LROWSIZE 55XSKIP 555YSKIP 65QH?\H ` h  (j` , ~  ( FILLCOLOp:t1VIEWPORT4P4LEFT f4|4f4RIGHT 4|4BOTTOM 4TOP TURTLEX 4 *)fjfjfj+*fjfjfj8 8)eeL )` (J(F ((Lee L  )L6I1L6)QL6        zjZ )# " `' & 8 ! 0%ee8` !  e e8"#088$ % 0%ee8`$ %  e e8&'08e*e+) [B  ""##8&$iT8&UU ! U"# UT`+%$Y)!p JhhhhhhhhhhH8 )%HHH`5>hhh)hh h h h hhhhhhhhhhhhHH J "  ` ` `SN-(' . hhhhhhHH `  [HH8H8 hhhL.+ rhh heheheheHHLh< L)ˢ   â LE % %  )  `8`&e epɀj f f&e e pɀjff %) % )`% L=`0(%$ $ @' &    0&!"   #eNEDh0h1hhhhh.h/h,h-h*h+h(h)(ȱ(*ȱ*,ȱ,.ȱ. HH1H0H(ȹ(*ȹ*,ȹ,.ȹ.`   ""##  )`%)8`)     e e  `(J 8 e  ` Z Z< $ %$PQ $  ߩ $ Li`t^cY}z I L`#JI`'  I` I0ݩ(0/,",i8i#Hiihifi`i,i,3iPII4ifH8H hIiH h hL8Iif E J j 8TEM.CHARSETx @4` - G`` 8`*UH)JJh & & f)4#i JL` T$Q%P)QتP+,+,ȡ+ ++V 0  آآآǿآآǿآآ@ ǻٚ SYSTEM.CHARSETáSYSl    ڪP."ˡ[̄$ʄ$N.ʄ$M ń.ʄ$M  ʄ$̄$.ʄ$M .ʄ$M Y@'    4 INI=6;BEEP=7;BKSP=8;CRET=13;CTRLN=14;CTRLP=16;CTRLR=18; "UNDEF=21;LABS=22;RABS=23;CTRLX=24;LPAR=40;RPAR=41;ASTK=42;PLUS=43;MINUS=45; "DECPT=46;SLASH=47;ASC0=48;LTHAN=60;EQUAL=61;GTHAN=62;QMARK=63; "DRAW=10;ERASE=0;AXORS=6;LEAVE=12; "SHFSIZE=12;MAXTERM=33; "UNDEFST='Undef.';FINISHED='Finished';  TYPE "intPtr=^integer; "cvalBlks=RECORD -codBlk,qusBlk,msgBlk,proBlk,nesBlk,lesBlk,dusBlk,ustBlk:integer +END; "cvaldata=PACKED RECORD -dummyLength:integer; -curVol,tstVol,dusVol,startVol:0..15; -bit12, & ب     (ܪP/0/0ȡ Ǹؕ/ //*V H؏ ١ ڢ؏ڢٍDުP_MAX:INTEGER):INTEGER; PROCEDURE GETMSG(VAR ST:STRING;M:MSGTYPE;MSGNUM:BYTE); PROCEDURE INFRAME(LEFT,RIGHT,TOP,BOT:INTEGER); PROCEDURE OUTFRAME; PROCEDURE CLEAR(X,Y:INTEGER;L:BYTE); PROCEDURE BOTTOM(VAR X,Y:INTEGER;L:BYTE); PROCEDURE CLRBOT(L:BYTE); PROCEDURE MSGBOT(M:STRING;L:BYTE);  IMPLEMENTATION E DURE BAR(X0,Y0,X1,Y1:INTEGER;C:SCREENCOLOR);  PROCEDURE ADDCHAR(VAR S:STRING;A:BYTE); PROCEDURE GETSTR(VAR S:STRING;A:BYTE); PROCEDURE DISPLAY(A:BYTE;M:MODE;VAR X:INTEGER;Y:INTEGER); FUNCTION RAND(MIN,MAX:INTEGER):INTEGER; PROCEDURE GETMSG(VAR ST:STRING;M:MSGTYPE;MSGNUM:BYTE); PROCEDURE INFRAME(LEFT,RIGHT,TOP,BOT:INTEGER); PROCEDURE OUTFRAME; PROCEDURE CLEAR(X,Y:INTEGER;L:BYTE); PROCEDURE BOTTOM(VAR X,Y:INTEGER;L:BYTE); PROCEDURE CLRBOT(L:BYTE); PROCEDU-Y,CS:INTEGER;CLRKBD:BOOLEAN;M1,M2,MLAST:MODE); PROCEDURE BAR(X0,Y0,X1,Y1:INTEGER;C:SCREENCOLOR);  PROCEDURE ADDCHAR(VAR S:STRING;A:BYTE); PROCEDURE GETSTR(VAR S:STRING;A:BYTE); PROCEDURE DISPLAY(A:BYTE;M:MODE;VAR X:INTEGER;Y:INTEGER); FUNCTION RAND(MIN,valdata);  PROCEDURE PAUSE(CS:INTEGER); PROCEDURE WSTR(S:STRING;M:MODE;VAR XP,X:INTEGER;Y:INTEGER); PROCEDURE FLSHRD(ST:STRING;M1,M2:MODE;VAR XP,X:INTEGER;Y,CS:INTEGER); PROCEDURE GETCH(VAR CH:CHAR;ST:STRING;VAR CT,XP,X:INTEGER; "ZMAT:^ZARRAY; "TERMS:^TERMARRAY; "NVAR:VARPOS0; "SEED,XSCR,YSCR:INTEGER; "K128:BOOLEAN; "cvaldatPtr:^cvaldata; "SCP:^SCRNPAR; "FRAMES:^FRAMESET; "NUMV:NUMVAR; "FR:FRAME;  FUNCTION KEYPRESS:BOOLEAN;  PROCEDURE CLEARKBD;  PROCEDURE MSGINIT(cv:cPWRARRAY; $TCOEFF:REAL "END; "TERMNUM=0..MAXTERM; "TERMARRAY=ARRAY[TERMNUM] OF TERMRECORD; "SOURCE=(PROGINV,PROGVIS,USERVIS,DICTATE); "VETO=(NOVARS,NOOPS,NODEC,NONEG); "VETOSET=SET OF VETO;  VAR VARS,DIGITS:^ASCIISET; "LEV:LEVEL; "EXPL:^EXPLIST; $XB,YB,XBEG:ARRAY[DVCOL] OF INTEGER; $YBEG:INTEGER; $GRFR:FRAME; $AXASC,PXBL:PACKED ARRAY[1..2] OF BYTE; $BLX:ARRAY[1..2] OF REAL; "END; "MSGTYPE=(MSGDUM,ERR,TAB,SIMP,SOLV,MISC); "PWRARRAY=PACKED ARRAY[ALPHAVAR] OF BYTE; "TERMRECORD=RECORD $TPWR:ESET=ARRAY[LEVEL] OF FRAME; "VARPOS=1..VARMAX; "VARPOS0=0..VARMAX; "ZROW=ARRAY[VARPOS] OF REAL; "ROW=0..ROWMAX; "ZARRAY=ARRAY[ROW] OF ZROW; "ALPHAVAR=ALPHAMN..ALPHAMX; "NUMVAR=PACKED ARRAY[ALPHAVAR] OF VARPOS0; "DVCOL=1..COLMAX; "SCRNPAR=RECORD OF PLACE; $BNM,BA:PACKED ARRAY[BLOC] OF BLOC; $BK:PACKED ARRAY[PLACE] OF BLOC; $RBLOCK:BLOC; $RPLACE:PLACE; $BTOT:INTEGER "END; "STEP=1..STEPMAX; "EXPLIST=ARRAY[STEP] OF EXPR; "FRAME=PACKED ARRAY[1..2,0..2] OF INTEGER; "LEVEL=0..LEVELMAX; "FRAMY[ECONPLACE] OF REAL; "EVALUATOR=RECORD $EOPS:STRING; $ECONPTR:ECONPLACE; $ECON:ECONARRAY "END; "EXPR=PACKED RECORD $EV:EVALUATOR; $EXPRST:STRING; $XMP:ARRAY[PLACE] OF INTEGER; $YMP:PACKED ARRAY[0..3,BLOC] OF INTEGER; $BB:PACKED ARRAY[BLOC,0..1].false:(cvalstr:string); .true :(cvaldat:cvaldata) ,END; "SHFARRAY=ARRAY[0..SHFSIZE] OF INTEGER; "MODE=0..15; "BYTE=0..255; "ASCII=0..ASCMAX; "ASCIISET=SET OF ASCII; "BLOC=0..BKMAX; "PLACE=0..PLACEMAX; "ECONPLACE=ECON0..ECONMAX; "ECONARRAY=ARRAbit11,disk35,twoPlus,normalExit,myDemo,ssDisk,init, /stayGraf,dumpOk,silent,fast,slow:boolean; -cvblks:cvalBlks +END; "cvalCheat=RECORD CASE boolean OF --)vPv RL Pۡ5 Ý ˄ǐ6666á 7á 7777á7á7á7á7/á 5á5 ˡ Ä 5Í ˡ SUWX>ǿەǿٕ " צ.Pؿ ٦תPġ á ٦Undef.תPáצFinishedP<    &     ( //#ڤ./j. //#ڤ/ڤ/./ڤ Vz 10a 5106d؏ :ڪP R áBPress [RETURN] to continue._S h ,؝37/Q7Q746š3š  03á04Ȅ6 3 /0121410/Ȅ71 á121110/š2š211132ō4/ɍ7a0ʀʀȡʀ̀ʀʀ ʀÍʀʀ Í݂ݎ̀[2Pʀá[ Pʀ[צʀÍʀ0<ުP (Y or N)?P 132_YN2ڡ 1XR70 á 00 ܪPƀʀʀƀƀƀƀPƀʀʀ ̀ʀ̀ʀ ̀̀ʀʀ ̀ʀƀʀʀ[צNʀ̀ʀ̀ʀʀʀ[ƀƀʀʀʀ ̀ƀƀƀʀƀצƀ ̀ʀʀ ˍʀƀʀá^ ƀ۪P[ڪP2٪P تPƀצ?ulrd Pƀ ƀ ƀ ̀̀ʀ̀̀̀ʀʀȡƀׯ ƀ.ƀ̀ʀ̀ƀƀʀƀ ƀƀʀ2ڪP ٪P[ [\ צw\2\ ]a؄  Ʉ] Í]]2ױ\Ǹܕ  2צ ׯ6^2\ ^]\ ]Í]Í[[ [[(S:STRING;VAR CT,X,Y:INTEGER;ERASE:BOOLEAN):BOOLEAN;  PROCEDURE WRTLNS(ST:STRING;VAR X,Y:INTEGER;LF,SECPAUSE:BYTE);  PROCEDURE MESSG(S:STRING;LF,SECPAUSE:BYTE);  PROCEDURE PCR;  PROCEDURE HOME;  PROCEDURE MARKSPOT(VAR Y0:INTEGER);  PROCEDURE GOTOSPOT(Y0:INTEGER);  PROCEDURE BOX(X0,Y0,X1,Y1:INTEGER);  PROCEDURE EXPRBOX(VAR EX:EXPR;B:BLOC;XB,YB:INTEGER); PROCEDURE SCROLL(XLEFT,XRIGHT,YTOP,YBOT,LINES,PAUS:INTEGER);  IMPLEMENTATION E :BYTE; /ITEMS,DO_MSG,CHGMSG,RETMSG:STRING);  FUNCTION MSGYN(S:STRING;VAR CT,X,Y:INTEGER;ERASE:BOOLEAN):BOOLEAN;  PROCEDURE WRTLNS(ST:STRING;VAR X,Y:INTEGER;LF,SECPAUSE:BYTE);  PROCEDURE MESSG(S:STRING;LF,SECPAUSE:BYTE);  PROCEDURE PCR;  PROCEDURE HOME;  PROCEDURE MARKSPOT(VAR Y0:INTEGER);  PROCEDURE GOTOSPOT  USES {$U :A.LIB}SHORTGRA,GRAFA; PROCEDURE GETOKCH(VAR CHP:BYTE;VAR CT,X:INTEGER;Y:INTEGER; 2VAR CH:CHAR;CUR,OKCH:STRING;LCASEOK:BOOLEAN); PROCEDURE MENU(M:MSGTYPE;REC,OPTIONS:BYTE;VAR CHOICE:BYTE; /ITEMS,DO_MSG,CHGMSG,RETMSG:STRING);  FUNCTION MSGYN,.-X(@ @  6 ^D@! ǿ8r8&HpN,ؤښ4  ۧč4ڧ٧ ؏*٪P.-.-  T a s ۝ GGە6 Rپ؂צP ˡ. ́-ʁ- Pʁ-RTNǿǿDġ ؤښ ǀ@(߂ ȡ,ާߕە 6  hhhhhhhh4i@Hihi$ Hi(hiɥHH`\t&p "USES {$U :A.LIB}SHORTGRA,GRAFA; "PROCEDURE CIO(VAR ZOUT:REAL;VAR OUTST:STRING;INSTR:STRING;SRCE:SOURCE; 0BASEVETO:VETOSET;XB,YB,CMAX:INTEGER);  IMPLEMENTATION E  #2L 8<=>F?A:CGJJLʷ"L(  USES {$U :A.LIB}SHORTGRA,GRAFA;  PROCEDURE ADDCH(A:ASCII;VAR ST:STRING);  PROCEDURE APPEND(AST:STRING;VAR TAR:STRING);  PROCEDURE PUTPARS(VAR S:STRING); FUNCTION ASCSGN(A:ASCII):BOOLEAN;  FUNCTION REALST(ST:STRING;VAR C:BYTE):REAL; PROCEDURE STREAL(ō梀ؤÏ á á梁#梁;梁#ݤ ń梀 梀梁#ݤ ɍ  á(梀ݤ梀ݤ  墁#ݤ ɡj  ȡ墁#ݤ ȡhj 墀 墀墁; @*墁;墁#墁;Ä ߕ  n  ˡ梀梁3 á梁#ݤō梀ؤÏ á á梁#梁;梁#ݤ ń梀 梀梁#ݤ ɍ  á(梀ݤ梀ݤ  墁#ݤ ɡjآ#آj  áآ7آ#N آآ   آjآ#  آ3   á3 l١ ˡ梀梁3 á梁#ݤ E CL<<ʷZ\\ʷxR` [E :E BODY3 WRITELINUNITPARTCOMPOPTINUMSTRIN\\ER.CODE1\.TEXTGb[h:mng>ʷB `^ph.CODE.CODEACKE.CODE1.TEXTG[:mƳgEʷ "USES {$U :A.LIB}SHORTGRA,GRAFA; "CONST YOF=5; "PROCEDURE DRAWBARS(VAR EX:EXPR;BH:BLOC;XB,YB:INTEGER;M:MODE; 5STARTONLY:BOOLEAN;BEGPTR:PLACE); "PROCEDURE SHOBLOCK(VAR EX:EXPR;B:BLOC;XB,YB:INTEGER;M:MODE; 5FLASHES,CSPAUSE:INTEGER);  IMPLEMENTATION   0.á@p ^P4-ٳ(`áJ 4 ؊0@{Η.á *`á@{Η @{Η^ ˡڡۡ   ݪP  ^ˡ ^ P2^`^ooצ05532`aצ,9225Q~p[~06/T~%<~hfem~u[v4̀4ʀȡǞa444 C $PBX=0.á@p ^P4-ٳ(`áJ 4 ؊0@{Η.á *`á@{Η @{Η^ ˡڡۡ `Ŷ!^ á  -Ä^`á#ö^`?á`á á ` ˶Ä  .á  .R^^B35ȸ^^5333_`Ä5^Fɡ 222+_4 ظ4  `á^ `0 ء  4 ɡצ^*Pس__Ʉš 5P$5^P`á5? `á5 ^3R ö^ 44  4 Ŷ4ĄCL<<ʷZ\\ʷxR` [E :E BODY3 WRITELINUNITPARTCOMPOPTINUMSTRIN\\ER.CODE1\.TEXTGb[h:mng>ʷB `^ph.CODE.CODEACKE.CODE1.TEXTG[:mƳgEʷVAR ST:STRING;Z:REAL;SF:INTEGER);  FUNCTION APPROX(Z:REAL;SF:BYTE):REAL; PROCEDURE SHUFFLE(VAR SHF:SHFARRAY;MX:INTEGER);  FUNCTION BINOPLOC(VAR ST:STRING;LOC:BYTE):BOOLEAN;  PROCEDURE NUMSUB(SUB:STRING;VAR TAR:STRING;C0,C1:BYTE; ,TP,MSG:BOOLEAN;VAR AST,PAR:BOOLEAN); PROCEDURE APPROXSTR(Z:REAL;SF,SFMAX:BYTE;VAR AP:STRING);  FUNCTION SMALLDIF(Z1,Z2,ERR:REAL):BOOLEAN; FUNCTION VERYCLOSE(TAR,TRY:REAL;SF:BYTE;SFONLY:BOOLEAN):BOOLEAN;  PROCEDURE GETXVALS(RND:BOOLEAN;N:VARPOS;RX:ROW;ZMIN,ZMAX:INTEGER);  PRO ݪP00 11\ˡ1b1)á30200&11iɄ1a2102307030270*1(á0 701ȡ 1 \13 h   t |١MڀÄɄ  ń )@ Ä ޮ Ä؄  ܹڂ(ڕ!ڏچ*/ %"  :7+3צ P öÄ öń'Xؕ  צ-Pxؓ *ؓ ءš CL<<ʷZ\\ʷxR` [E :E BODY3 WRITELINUNITPARTCOMPOPTINUMSTRIN\\ER.CODE1\.TEXTGb[h:mng>ʷB `^ph.CODE.CODEACKE.CODE1.TEXTG[:mƳgEʷ "USES {$U :A.LIB}SHORTGRA,GRAFA,STRAP; "PROCEDURE EXMAKE(VAR INST:STRING;MINCO,MAXCO,MINEX,MAXEX, 'PRPOSNEG,PRADDSUB:INTEGER;VARCHG,SHUFL,OMIT0:BOOLEAN;VAR XSUB:INTEGER);  IMPLEMENTATION E <=>F?A:CGJJLʷ"L(*Í22   ݕ PV Ʉ=/ @ 2 ڡ[[[2 [ 2 2ȡEܡݤ $ݤٕŕL Z צ System error.Hold [CTRL] and press [RESET]. ndPL$\2š 2Í22   ݕ PV Ʉ=/ @ 2 ڡ[[[2 [ 2 8 ōھ@0 *ײ P, ߪPń -ÄB333 3+Í +-3  -Ä@ 2š2,Pá 0Pߡ0. -P`{pT  ؂ š ȡݤޕȡ' ݤݤܤܤۚ šg:X  v ɡ%؀צP  $   ? ȡ9 =  0ނ  ȡ 0ؑ ȡ0Pɡ1݂ɡצ.10)51=133100.35/Lb  =̲,4پáٕ# 2@{ΗۦUndef.תP0Páצ Pٿ٪PPRצ(P),ȡ 000۪P5.3/00-á..053 3000.á<CEDURE ERRORQUIT;  IMPLEMENTATION E APPROX(Z:REAL;SF:BYTE):REAL; PROCEDURE SHUFFLE(VAR SHF:SHFARRAY;MX:INTEGER);  FUNCTION BINOPLOC(VAR ST:STRING;LOC:BYTE):BOOLEAN;  PROCEDURE NUMSUB(SUB:STRING;VAR TAR:STRING;C0,C1:BYTE; ,TP,MSG:BOOLEAN;VAR AST ɏ   ؿ ڶ ȡ ھ۹S     ɡ-   ؊ +}F]  "$&(*,.02468:<>@BDFHJLNPRTVXZ\^`hjlnprtvxz|~\˂ צ 0P +á #A02\P ء  a3ٳ`a&a cŏcš  @ٿaÝɄaz ˍ bŶ !`bá7 j^ áb áb ?áb á  á b ػ +ö -Í -á '@!ب  - <  \+,ö \ -Ä+ɡl^g  ˡNس@aa5٢٢j[٢٢;٢jZb ء   |ö ö` [ ؓ ,Yؓ  á  öÄ ءYY^``8 š- ,Y á  á YY á^   ˡfr ?š  \@ ٿצخ ,Y*á`؝ á leftצerase a character G áצupstart an exponent $ á  á  ġ@ á_[Z  ۚ   á ٸĄ á[[ ز[Z ö]TPɡ ɡخ آj   آ;آj:Xqȸ`` qXXXa_bÄ,.02468:<>@BDFHJLNš qP5q^Pbáq? báq báq `X TVX  ˡ ,,,j[ ˲Ą Ŷ[ ɡ jצ^*Pس__ɡ    Vabsolute value CB denominator T  Bexponent  5Bצradical %J N3X)Pw  "$&(šP&8  ڪ٪# $ v. צdownend your exponent & צخ  [[  ٶڢj$š ٶk&qa Ŷ`     cp@$k,  ,^ˡ ^ײ,PYa`bP ٪ت ODE);  IMPLEMENTATION E R` [E :E BODY3 WRITELINUNITPARTCOMPOPTINUMSTRIN\\ER.CODE1\.TEXTGb[h:mng>ʷB `^ph.CODE.CODEACKE.CODE1.TEXTG[:mƳgEʷ "USES {$U :A.LIB}SHORTGRA,GRAFA,SHOBL; "CONST MAXCODE=63; "TYPE CODEPOS=0..MAXCODE; 'CHARCODE=PACKED ARRAY[CODEPOS] OF CHAR; "PROCEDURE IO(VAR EX:EXPR;SRCE:SOURCE;BASEVETO,PWRVETO:VETOSET; .XB,YB,CMAX,FRACMAX,DEPTHMAX:INTEGER;INSTR:STRING;TASC:CHARC3zp & pz @@p@pōaAzkAkȡ{Aiɡ Aa [Apɡ Aa Cۡ5ڡ Aap3Ap Aa@@@@zšp@ AaAAA a@k@kȡ@ @@  @@ȡ`@AAaġ:Apɡ/B AaB@@ AaAi@@A AAAZȄA @@ׯ0P=á 0P=á0 |F6*$ az 3zp & pz @@p@pōaAzkAkȡ{Aiɡ Aa [Apɡ Aa Cۡ5ڡ Aap3Ap Aa@@@@zšp@ AaAAA a@k@kȡ@ @@  @@+:"^ %\% .á  .%= 0 .áH&%  0@{Η<' )_ bá0] ' .á&]!@{Ηbá ` ܢ*ܣ)@ܣ)i $   ˡ خ./˄ >( ݢ#ؤݢ#ؤݢݢ#٨QܢOÂܢOšەܢOá ܢOhؼ!ؼ^]k  س@{Η4 @{Η@{Η   ?^-@U % LINEAR,IDENT:BOOLEAN; % XFACTOR,SOLVED:EQNTYPE %END;  FUNCTION EVAL(ES:EXDAT;RW:ROW;VAR RHS:REAL):REAL;  PROCEDURE VARSORT(VAR VNEW:BYTE;ES:EXDAT;INIT,NEWVAROK:BOOLEAN);  FUNCTION IDENTICAL(STEPL:STEPLIST;INIT:BOOLEAN; 0COUNT:INTEGER;VAR FINITE:BOOLEAN):BOOLEAN; PROCEDURE LINCHK(S:STEP;V:VARPOS;VAR EDAT:EQNDATA);   IMPLEMENTATION E %EXDAT=RECORD 'ESTEP:STEP; 'ESIDE:SIDE %END; %STEPLIST=PACKED ARRAY[DVCOL] OF EXDAT; %EQNTYPE=ARRAY[SIDE] OF BOOLEAN; %EQNDATA=RECORD % ROOT:REAL; % LINEAR,IDENT:BOOLEAN; % XFACTOR,SOLVED:EQNTYPE %END;  FUNCTION EVAL(ES:EXDAT;RW:ROW;VAR RHS:REAL):REAL;  PROCEDURE VARSORT(VAR VNEW:BYTE;ES:EXDAT;INIT,NEWVAROK:BOOLEAN);  FUNCTION IDENTICAL(STEPL:STEPLIST;INIT:BOOLEAN; 0COUNT:INTEGER;VAR FINITE  USES {$U :A.LIB}SHORTGRA,GRAFA,STRAP;  CONST LSIDE=0;LRSIDE=1;RSIDE=2;  TYPE SIDE=LSIDE..RSIDE; %EXDAT=RECORD 'ESTEP:STEP; 'ESIDE:SIDE %END; %STEPLIST=PACKED ARRAY[DVCOL] OF EXDAT; %EQNTYPE=ARRAY[SIDE] OF BOOLEAN; %EQNDATA=RECORD % ROOT:REAL; ` $$n!: P` * L  D h l2^.<Zrnd2٤Zá#jpák t  Ǣ UVWݢ)@]ܢj^P^P \[Z ޢ;ޢPޢ#^p  š0ܢOܣPܢO ܢ#ܢjܢ#ܢ# ,٪P ب @1ȡ#P٤P/ ō21PZ <ġ !#" ٤Zá#jpákەššxe / ڣPȡڢؤ٤ڢؕ٤&<1 1  á٣P*2 P P3ٻ^ˡ#já ظ[٤ݢۤؤقɶقō áݢ3ݢۤؤš ݢۤؤٚá4 0 ńk0ܢ3ܢܢ3öܢڤەōܢڤ c, á."- cڍ\١-ړ * *  c@  (z # ݣPȡ5ȡ#ݢܤڤݢܤڤܢjآjá M[[\U .(UUUVWá  \ á l.!bŶ @$ á)x   (` á@ (G (á (. á+"ܢ7ۻ[ ٮ /[šܢܢ#ۤ[[ɡظ[ܢܢj[**VVUU )U W  (WWUU2+ ., ݢݢ#ݢܤݢۤݢj۾ˏـš9 ˡȡݢڤݢڤق)  * U V ܢjܢj Ą%`Xqš`  ܣP[ ܣP /-) ܕ܊   Z ) @{Η)  @&s 0_p$܊      e ȡ*! @{ΗڑšV@{Η@{Η@{Η"ڡ   ܊               )޶Ʉ  &     S^ $ ٳ=ټ ؼ  @{Η@{Ηȡ  Q? ܕܕݢ ݢ 0    8 ȡޤ@{Η6š޶ɡ@{Η@{Η;LAB:INTEGER); "PROCEDURE DRAWAXES; "FUNCTION COREAL(RW:ROW;N:INTEGER;NV:VARPOS):INTEGER; "IMPLEMENTATION E R.CODE1\.TEXTGb[h:mng>ʷB `^ph.CODE.CODEACKE.CODE1.TEXTG[:mƳgEʷ "USES {$U :A.LIB}SHORTGRA,GRAFA,STRAP; "PROCEDURE LOCAXIS(N,PXBLMIN:BYTE;BEGPOS,ENDPOS:VARPOS; ,ENDROW:ROW;USENDPT:BOOLEAN); "FUNCTION REALCO(CO:INTEGER;N:BYTE):REAL; "PROCEDURE AXBAR(N:BYTE;STDCOLOR:BOOLEAN); "PROCEDURE DRAWAXIS(N:BYTE;LAB0:BOOLEAN$$$8 4$%$84$1$+$+$%$+$@{Η7$+$87$7$%$4$%$8$$7 7@{Η7+71*(0lBz  Zz$9$9ȡm%$$$%$+$$$+$$$$8$8ȡ1$$$$$8 4$%$84$1$+$+$%$+$@{Η7$+$87$7$%$4$%$8$$7 7@{Η7+ z$9$9ȡm%$$$%$+$$$+$$$$8$8ȡ1$$5 @{Η8  z 788ȡ" 99ښ97 7+ %+G ǦB 88   Q߾ޝaáޚء a áء?az ȡ0aŝɄa7 ݨńܡ3 ȡ%G ǦB   ڤɡ (ɡ:@ɡ 1aɡ*@a   ۤ@{Η ڤ    ܨ \ ,ڨ١ p_N=@{Η*/ dUH;  0? 4'@ 2nQe   @{Ηފ @{ΗG.ފ     q W z -- á'----Tt  ܢ( Äۢ ٕٕۢۢۢۢ٤ j   &  ۢڤۢ4 #   USES {$U *A.LIB}SHORTGRA,GRAFA,STRAP,SHOBL,GRAFC,CONIO,EVALU,AXDRW;  TYPE CSET=SET OF DVCOL;  FUNCTION ONSCREEN(RW,NV1,NV2:BYTE):BOOLEAN; PROCEDURE CONBAR(RW,NV1,NV2,N,CT:BYTE);  PROCEDURE PLOT(RW,NV1,NV2,FCT,ERX:BYTE;UP,HP,PX,PY,C2:BOOLEAN;VAR ERR:I  _  áB @ t<d ;⢁e;⢁d ⢁b   !   ˄?á  ˡߑ Bá.ˡ      dڨáReviewBeginn  ˍ  ! ب     U⣁c ⢁c⣁cP١⢁e;⢁e;⢁d ⢁b   !   ˄?á  ٦Shall we do another lesson J بܕ   ١V    ŴĄ;צ#04:USTRT.CODEP; 0; 0;  ddeePf ePd ,,# 6& ^__ȡٶ^ٶ čٶ   Äړٶ Äڡ ٝ ۡ5צIf x=#P߸a  ``ȡK aš5ŏ,"R!ءڶ צPlease evaluate: ء1ݓ.1 1# 1dݡء!ڤ ض   #تPƏݢK ڤ   ܸV6צ 2,"@{Η"L  Q٢٢ Q٢٢   (ݢݢاݢa۶ azȡ/ašٿ ȡ٢٢$  `1ȡȡ ٮ82'FI ضPZ ȡ\٢ȡ0٢Q٢ȡVQ٢٢ۢ٢٢٢Qɡ ܢO6٤؂*Qܢܢ#ڕڕ:  ٢٢٢ height~=~=)Pۓ =)Pړ =)P ݡ צ   צ ܡGڄ&צThe lines meet at the point צThus, this is where     e ݶܶō     `١(,)תP ̀̀ʀġ=) =)Pʀaġ*X~=~=)P=)ʀöڳ ڳ  ۶ˍ ڹەۂ~ۂwەp;h$ 7 "$&(*,.02468:<>@BDFHJLNdRTVXZ\^`bdfu    ?Í? "٪  š    Fڡ$ ߢߢ 2ت     ?ُ؏:     ݢلݢöڕnݢaġ צcorrespond to =)Pצhave =)P=)צPoints on this line ڡڂڡڕ$. ȡ *   áߢߢ ߢߢ  XتPP.P2R0ö   /٪PتPۡ/ái/theצeach /צanotherצmore /valueצvalues /צthisthese /variableצ variables /צxy ܝ  !/ (";"=up,~"/"=down)צ^v /צ^v YXYX/YX  ە5&5צ , and x=#P    & `aaQ`` is~#.&^צ dٝdړۂ؝ٶĶŶJf,(%  č ɕצLet's try more values: dȡ) ɡ 2%'7  ȡ4 ɡ  ..// //.آ צUSTRTPצ#04:P 0 0Zx -ء-  Welcome to Algebra Mentor by John C. Miller.تPǮG ǶG BǂB,,,,,AšTRš%%ˡk..á"šd= Filling memory card. ƃ ƃ ƃ p@ @ 2\ $0 $:Í áضP   ݄ Ě Ív`M M M  (ɡɡ..ݕšݕޏޏނ!:  0 RAMƃ ڦ USTRT.CODE  ̃ʃ̃ʃ.DD00................תPʃڻʃ ٻʃ @  ʃ @ @ @ آ  ت  ["áJM Ä6 ػ  ۪M M ɡ M M 0 F ڢצSYSTEM.MISCINFO ڢMSG.DATA ڢPRO.DATA ڢLES.DATA ڢNES.DATA ڢDUS.DATA צ System error.áDisk is write-protected. LتPRتPR צؚتP,,TABOOT tMT;_]^IY^eeb"VXWa]P"kq|u ;Ityvlvw5j~CmM;{qƽ}͗;88887(5nymyX0vv|g6C|~}f!zHەצ  K  .&H4f6< B J <  dtP:jJfT P(  (second תá צٝá צfirst צ  (ٝɡ$צ ٝá ' ޢ  #   ##ݶȶۍ$'    $ ȡ}٤@{Η@{Ηضض,  (second תá צٝá ء  #04:USTRT١ PPn0"L<Xt42ˡk..á"šd,hhJiЍ L֢ hLh )hJ¥jJJhhihhhhhhb\8ſƅhx Щ&'H(f'ꮭ'eƍ8ƅб ĘHH``P@ߠ ߮м`|H ߠ ߠ'È h`@ ؠ ح0`+` ޥHH ޥhhL ߦ ސ`,10` ` ` ` ޤOȄ`H$)A[hIH80(hI`i(8H(LhhhhhhhhץHH`JJJJ ϱ`H "ݠLf H 9h`JIi' 'x`38 0P`8 0 ߥ` )`,10 )?ILޢݮ` ߅߅l(,LZ ݘJJ )  LJI)LZܩLZ܊) 9ݐ)LZ܊JȩآL ݠ؈hxJiЍI*EJ F؅GF G ӝ4ȩآL ! ֑ȭ֑ Lܢ `) ؊H "h ɢ` ع)`H B "ݠLfڠ0* )` ]Hh` } p pۢ` ێ` ح`2`) ! ` عJ` " MȽ` B "HLf ݠ }ۑ p0 ۩J*L ݢhhhHH)> `( $ `Q`) " Ȣ``H "ݠ h ڍ,,`lJI*I II `$p"0*nXw ؆ ڤ ڢ` ` (!/< ` ح0 ,10i0  I ,109,c$0 A[ $P0Jj)jj&UIL؈ )?LI@a Hb c0  hH َh$L hhh O靱`hhh(`hhhDEDD@+( `8][ ZD[E`&ʩˠhhѱʅE[ʅDZȑ`8Hh`HH(x h(`HHH*LfF0 9ݐ9 Lo٥")jR )LB֠BȱB֭J `JB)BC ֐+/ @( ` ֌֢`0&J}iʰ ֥͝֐` حBCJuJ DE 9ؽFG ְU0ЬЧJ2DEϐ8 (ֹO H֥ +ֹW H H)*Ȫ`FG8` 7 `0($ p,&"VU>)Q>jj`l ! a hx ץH( h ֥HH`:ֈ`֙:`JJJJ C֩B8`Ί aՍxՍՍՍե>?Ռ8T8ՌWuՌvՠ ýI꽌ɪ꽌ɭ蠪ϮәVE]ӾV]H)]ӾV]ԙ)]ӾT]ԙ)]ӦΨ 8$hU>`ȅSϭ߅83Iߐi ө ө ө ӽ`Hh`Q꽌ɪɖν*Ͻ%ϙEΈ 꽌ɪ`8` Hh݌`  $(,048<@DHLPTX\`dhlptx|Հ؈䤨谴LјJ 8彐.mĿ"Š>?( _֮ˍL հ˩($8` Ґh Hǹxhx N`8Ύ߽0|ϩHhHh ӈ ө ө ӘVYԦΝYԮߝꪽԦ ө  Ͱ()I يJJJ(jǩF؅G(  Hֈ k( F G  Wj0 خ $Ӱ4 xH ߩ`Ǚx kh k@(LYҭH͍h (ͥpi)ͥˤ˹(hI`J) )i i`HH8(iPH ߠ'(hH tߩ thhehL ߍߠ'O`J!L80 %M8$L/L`    Objqޏtޘޤޮ޴޵޺޹iL~LLzhhh~h~~~р ȱ~р~р %v HHLҩHHLҢh~E0~E~~~Ղ0LLh)~hh)h~Lz vhhȱLѥ8Ɓ8 рР~ȱ~LҠ ULҥXiXYL h~hhh~ȑ~Lҥrehrseistehtueiuisu ʱrtLhLrtLhhhi0WhthuhetthetuLhLtLhhhhhehehhhhhhehiehIihIiiŒ.Lm'ņŇ0 L\8ƇL\8厪HHLhhhhTLvץT8~U~8~Xȥ~YT VLҍRSLȱrtL뤌3r8包rst8包tur8rst8turt`e`aea^`8ƛ`8Ƈ` 48ޟ`#^i`ia\]`hh Lhh sLҍX lhhhhhihhhhLhthuhettheuui ʑ8儅ƛi揥8Ɓ0I gȑ8内凅8刅ȱ剅ȥ geȱeiƄL륊rstu8r`sa8trus~ [8咑ȱ哑8ƏƄئsuʱrtPQ L g챆e`ȱea8嘑ȥ噑8񆅔ȥ񆅕 g iiLv꥖ (楘 (楔 (хх ( [쥀iƄL rs\t]uʱrtusLꦌLrt~8儅1+Ŋ勰Œ哐8ƏƄа~ŊŋLP쥊8Ƌ8񊪥񊅋i8劅勅8\包\]卅] t8`a8\刅]剅 [ 58Ƈ8\񆅖ȥ]񆅗8񆅖Ɨ8 ƗL  `\]J~ e~~~&~m@mA@6ȱ@18\@\]@] t\8]^`Lъ8`a ~8`儅a8bcL`a8Ə [  a@ȱ@  Ŋ勰HHH~ 9~H `[HZH j楙HHHH ~ ֽӥqփaߖߎ>D՚ߒԊr"܁ն}n7!w?[%%uvNNNNNNNNNNNNNNNNӰӰӰӰӰӰӰӰӰӰӰӰӰӰӰӰLhh&eȹȹp)1)fjjj)?~Ōe~9h pHHLҦpHHL @hhHHHHhhhhLAߥ)LA8内凅L:ߥ) fj~) fj8~J߅K߅HHHʚL ܦņ hI9ʚL ņ0 hʚL҅~Ƃ~eʥƂFHHLҍX hh&ŎL0eeƎLҥ8包Ŏ 8吪8吪ƌff =H߅=IHHLh~hhhhh H߅%~~I߅%80~~i ~&&hhȱI%~I%ȥLhhh heȄ Ȅ~l ܦ8e h9 0 ~LLҠ UhehheiHHLҠ UhehheiHHLhh Uѥi h&Lmۥhi ץheheHHLҍXXhh o&heheHHHHeHHLhhhhhhȱ80 iXYXYX悥q~m\8傅\]\)\]H\H0 X\\8\]\ȥ\ȥ^\ȥ_\\^]_8\Z][LѥXeXYLҥ~i~H~HLhrhshthuXs&trȑtLҠrrtLڱrtLL-Һ~`ffofn&&`hhhh oإIiIiHHLhhhh oإHHLh~hhhE0Ń)ŀ!0E0~łLLѥ^~_~`~Xȱ~Y`~ȱ~~L ٥XYXYXXYL ٔ nenoeofofnff`hh0 hhLWhh"IiIiIiIi ץHHLҺHHLؠnoL ҥIiIi攥IiIiƔ8吥呰 ` of"f fofn8no8&&YL h~hhh~&Zȥ[Ze~Z[e[8\Z][LL h~hZ~ȥ[~Lh~h~Zȱ~[&'LҩlLhh0HHLҨIiIiHHLҺ}}LhIihIiHHLҺ8LҩonffLhhh~hhe~~he~Lhrhshthu UL"ﺽ==LҺLhhIHIHLҍXXhhQX0XŗiX`0\XE0XLXŖC?8XX&XeYei无8XYLҥXiX UѽeheiHHLh~hȱ~H~HLh~hhh~ȥLҍXȘ ~X)XYXHXHXe~XYLҍX~ 8倐~hrhsrHrHLLэX~e~e~tu~LhththhLҺh}~h}~neQo hnhnLҍX Ѡ Uѥhelniemo nHnHLҍX Ѡ Uѥhelniemoni nooHnHLҍX Ѡ Uѥhelniemo hnhnLҍX Uѽeh~ei~H~HLҍX Uѽeh~eih~h~LҍX X0 eXXYLeT~eU~8~X~YLҩHHLҠXHXHL飨RHRHLҠ zeRneSo nHnHLҠ zeReSi HHLҠ zeRneSo hnhnLèPHPHLҠ zePneQo nHnHLҠ zePeQi HHLҠ zeP[,($  abc    id HHV  vPRȥQRRȱR8Ɓ8R RLҥXiX0Y,XiX#YHHXYX ҍlXYX ҍlh)hLhT%%ҋw %%%%%%%AXI_5m}TLXiXYX h&i` hi`XXYX *` `RlSml~ȱlm~l`&'`Z'[&'`1~LHD&'Z\]bH9j߅9k߅HH~ HHHiHLҩHHLҩHHL?? vXLL LL   UFifhLߠ Uhhh~hXYhL ~р~