`L i=L\Ʃx ? N'i  ͭЅ?0ȱ Ѕ?iȱi lԠԠ͠ԠϠŠͮŠ SYSTEM.APPLE   L$J~!1B =(I"UV  a4':ym3@ yL?R")K<dWjC4dc|oTh{(f-Ͱ 3&e#58ƫ>j:57LP!V7 QhGhDیn!/`a- /)9 #E =NQC{!$*]]#A;iys3~$űq;!Ī݃0l6*׼t,«H/ N_Vԛ\D `f\T%x INTROSGNUMCTRLUIPLOTIGRAFSIMPMIDENTIFORMFAINTFTTRMISOLVSOLVEFRINTTESTPROG :óbEИ :+Q$d* ]"z#>i6mKIvcl|oQ{Pl" 8q&ٰg>^X$Pe #=aIިlͮ$a'.:3AL?FR#&3dW&j5)|no΂?լͱ &vo8'> PáVX ܺ- hMn!A΀J &# oQ$G*M]ihxĘ? 5V5 Wϻ h!mK_9 .EQ3y?@Kd W j|o'8+ Γ>p)E 8aP >EpʒPÛV LhG!*{-9 E} )Q>$AP#F "ҷØV ܑ\ n!E-z9 hۯ $>]#/*uX;A10113T DUS.DATArd NES.DATAv*H PRO.DATAfdp+MSG.DATAfd+,SYSTEM.MISCINFO®,H SYSTEM.PASCALd9JLSYSTEM.CHARSET;L\ USTRT.CODEd\v SGNUM.CODEd nycncyny30E0T1gCoie,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`&r~k˄wV!!^7(} .?.J9@F2%HKParty Animaltf AcadeG;X}ot%!=UY-ib rqb AϹuuAy 0q di!CeExecute**vvʡ A1011 MasterR(TREES)mic AffairsUSa7P.}6m? +; L`CIL Hlmu=8 C FS+,WP R,! x/^ of multiplication. rse 334".4)(3) 3. Fractions are used rse 334".4)(3) 3. to represent division. 334".4)(3) 3. $1 66778 600 000 4100 $$6+4".4)(3) 3. $1 66778 600 000 4100 HH6+4".4)(3) 3. $1 66789 600 000 4100 :$..3".4)(3) 3. $1 45678 500 105 D1".4)(3) 3. $1 23456 511 100 6211 +5-31".4)(3) 3. $1 45678 501 100 62011+5(71".4)(3) 3. $1 34567 501 100 6201 )7 D1".4)(3) 3. $1 23456 501 100 6211 +5-31".4)(3) 3. $5 66778 800 022 41005B!334".4)(3) 3. Division is the reverse 334".4)(3) 3. ; 611 000 6100 3(221r 3+3+3+3. $3 6789; 611 000 7100 --3(1r 3+3+3+3. $The expressions (4)3 and (4)(3) 3. also mean "four times three".4)(3) 3. $1 6789; 611 000 6200 3())1".4)(3) 3. $1 45678 511 100 62011+5(71".4)(3) 3. $1 34567 511 100 6201 +adding. $1 34567 501 100 0401 D D1and adding. $1 23456 501 100 0411 +5+51and adding. $4 67888 811 040 61004445*3and adding. 'Multiplication means repeated addition.' ~~~~ The expressions 4*3 and 4(3) &both mean~~~ "4 times 3" or 3+3+3+3. $1 67890 21011(5(51and adding. $1 34567 501 100 2101 D D1and adding. $1 23456 501 100 2111 +5+51and adding. $1 45678 511 100 04011(7(71and adding. $1 34567 511 100 0401 D D1and adding. $1 23456 511 100 0411 +5+51and adding. $1 45678 501 100 04011(7(71and $1 66778 611 000 2100 3(221and adding. $1 66778 611 000 2100 553(1and adding. $1 66778 611 000 2100 3(..1and adding. $1 45678 511 100 21011(5(51and adding. $1 34567 511 100 2101 D D1and adding. $1 23456 511 100 2111 -3-31and adding. $1 45678 501 103-31 . swer. s $1 45678 501 100 31011(5(51 . swer. s $1 34567 501 100 3101 D D1 . swer. s $1 23456 501 100 3111 -3-31 . swer. s $3 66778 811 022 21001331<1 . swer. s We subtract a number 1331<1 . swer. s &by reversing its direction and adding. ining their arrows.1 . swer. s $1 66778 611 000 3100 3(221 . swer. s $1 66778 611 000 3100 --3(1 . swer. s $1 66778 611 000 3100 3(..1 . swer. s $1 45678 511 100 31011(5(51 . swer. s $1 34567 511 100 3101 D D1 . swer. s $1 23456 511 100 3111 -swer. s is the size of the number. . swer. s $1 34567 611 000 81011(5011 . swer. s $1 34567 611 000 8101 D011 . swer. s $1 12345 811 022 8111 -3011 . swer. s $3 66778 811 022 31003223(1 . swer. s Numbers are added 1003223(1 . swer. s by comby to end your answer. s $7 33444 811 088 810055*015r answer. s An arrow pointing up 55*015r answer. s represents a positive number. swer. s An arrow pointing down umber. swer. s represents a negative number. swer. s The length of the arrow mber. $7 33333 :00 z00 2201149141 Y,2Ie%We'll start with some easy problems, eto show you how this works. oblems, e"When you see the flashing cursor, s, e&please type the answer to each of the 'following problems. Remember to press %the [RETURN] keR0LJS TU#:?:? nyncnycyE0A1 Peluh5 ,P,ke /Bsgnl9C0rgsAi,ro.e4CAb9n5 er3N 8Xs#9:s"-;HCa<aNL= 4->#*p2#?kCItDk|E@F1GcH ENIQOPQQNQv1X!+H7,"!#1$UZ2%?D&=69'*s(P)x*-<M+ig,D%c-8. ,,J/A3+g9457%0 41011(5(51".4)(3) 3. $1 34567 500 100 4101 D D1".4)(3) 3. $1 23456 500 100 4111 +5+51".4)(3) 3. $6 66666 800 077 5100722:/6".4)(3) 3. An exponent or power means ".4)(3) 3. repeated multiplication. ".4)(3) 3. %It is written above and to the right . !of the number to be multiplied. ght . 'A non-zero number to the power 0 is 1. $1 66789 600 000 5100 5*223wer 0 is 1. $1 66789 600 000 5100 5*333wer 0 is 1. $1 45666 600 000 5100 --:/6wer 0 is 1. $1 45678 500 100 51011*6051wer 0 is 1. $1 3456ETURN].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].ing 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 [Ris 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 7 500 100 5101 '9031wer 0 is 1. $1 4568: 400 100 25011+5+51wer 0 is 1. $1 2468: 400 100 2501 D D1wer 0 is 1. ncyncnyyETA0DCltl,eei9bb4eAo C o3iA5Psgk s,B,oeC yorg/r 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 values 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 theaising 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 matces 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 rtors 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 variablesh 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 numerator 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 lways 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 whoseis 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 a 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.ancellation 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 an 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 "length0ˡ ɡa áá0š  %4á1á$009ȄX 000á'$á 009Ȅ00 qS\  ɡ'áצ-32768 ^ 逫-ġ>00ń  0& "ˡ  J   00áQP 0á0 é000+-Í- šš që  N "ˡ )á á áaˡ á Nšá áÄ& ܟˡ,  צSYSTEM FAILURE NUMBER  צ. PLEASE REFER "TO PRODUCT MANUAL FOR EXPLANATION.  DFCOPYRIGHT 1979,1980,1983-1985 APPLE COMPUTER, INC. ALL RIGHTS RESERVED    DPASCALSYUSERPROGFIOPRIMSPRINTERRINITIALIGETCMD 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..g ncyncnyyDE101Cltl,eei9bb4eAo C o3iA5Psgk s,B,oeC yorg/rrall 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    Q lȡPš蕫š 쾿  /P ná " * ȡ*ńȄ4šáRתPńȄ ,ń.áš蕿  /IF/E .gEH87CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8E/KY Kh Pt.PE87CONSOLE187CONSOLE1:7SYSTERM2:7GRAPHIC3:7PRINTER6:5REMIN7:6REMOUT8P IYIL: P/.P> 8 ́$ʁ$ ʁ$ ʁ$ ʁ$ʁ$!"ʁ$ʁ$ʁ$ʁ$FZ   ނ ń! áނ š   šš$ !۞ۂۂەߓ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> Dⓡ4"צˡ䓡 &ˡ& öÍ##&á &'"&㓶℡'á.0:'#.+á$š ġ  ^ $?š?ˡ?ء "ˡ%ߕނ߂ɡ F b%ARAn@vvXX < ~LJ> P b p 2 F 'ˡ   d쓡  !!  # 0"ˡ4$ š F#,á1š ġ  # #6"'á *   šˡ 퓄 Ä퓡x š   ɍM   "ˡ. š K%"á61 ɚ V %ɡšɡš  V#&ˡ @šQȡ2 š:X f Ą ɡ 낫š ꓡ!š땫Ě@%"á1ꓡ삫Ú ::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Ɓ/@š4SYSTEM.CHARSET+ \٢ š٢ ٢٢ 4$  /   d á/)צ*SYSTEM.ATTACH áá(*SYSTEM.STARTUP š pNBz version 1.3ړ22 Ɓp Ɓp2Ɓ2Ɓṕsʁsȡ%Ɓ2ʁsƀʁsʁśsƁq ƀƁq O*SYSTEM.LIBRARY  ́sʁsȡ'ƀʁsʁsʁśs2 Ɓ](`  aʁo ת "ˡ ܡ́tˡ2"ˡڡsƀ ˡfSYSTEM.COMPILER RFORTRAN: 4  is not version 1.3ړ22 Ɓp Ɓp ȡ0ޤˡ ߢ`ޤ7 VڪƁ Ɓ "áP̂/ʁ ʁ"ˡ3Ƃ. Ƃ.Ƃ. Ƃ. Ɓ Ɓ X  ߪPƁ]Ɓ4 PƁ4ƁaƁeƁmƁn ́oƁآڤ áCá>آآ*Ík vޢ ȡUڤ ˡBȄ-ܢ0ۤ ݢ`ڤá \zڨ !!P!x!P &(.Bۢڤ ɡš2ȡۤˡ áڢڢˍ? Pˡצ š š۾.ˡצ([šܕ!!(š۾:ˡ١.TEXTת .CODEת!!ȡ)ܾaܾzȄ ܾaAܾ ɡ?š!!Ȅ11צ(The 64K version of SYSTEM.PASCAL cannot צ)run with the 128K 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 ʀ  ʀ ̀ƀ ƀ ƀ   ʀˡ L تٞ&"á ٤ ȡؤצۢÍ ȄۢÍ؞&"á  ʀʀ ʀ ʀ ʀ  ʀʀ̀ʀʀʀʀʀʀʀʀʀ̀̀ʀʀȡʀʀ̀   תʀ'*SYSTEM.MISCINFOת; ̀ʀ*ʀ+ʀ,ʀ%2 &̀ʀʀʀʀ%̀̀̀ʀʀȡʀʀ̀ʀʀʀʀʀ2Ɓ2Ɓṕsʁsȡ%Ɓ2ʁsƀʁsʁśsƁq ƀƁq O*SYSTEM.LIBRARY  ́sʁsȡ'ƀʁsʁsʁśs2 Ɓ](`  ުPצצ22ȡ5233 ȡ 23a3zȄ 23aA22š*áݲ%áݲצ:22ȡáݲ 2á!2ȡ5252š[22š22/13:! $ ~\",䚹 9U[2˄ޢߢšáޢ ޣ ߢ  dޣޢޣ ޣߢ  dÍÍޢˡ ݓۤ ۤ Äݓۤ  dÄÍߢ ˄ɡۤ  dáߢ  dá ߢ #ޣ˄ ߢ  ߢ ۤ ߢޣ ޣߢ ޣޢ ޢۤ ޢ áޢá צޢޢޢ١ ˡ) ! 䚹 9U[2˄ޢߢšáޢ ޣ ߢ  dޣޢޣ ޣߢ  dÍÍޢˡ ݓۤ  lܟ˄ݤ צ   ١  n ١ á9 ٓ/! !!! á ݤݚ ˄ܟń ١á  ޤ 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ׯۤ Äݓۤ  dÄÍߢ ˄ɡۤ  dáߢ  dá ߢ #ޣ˄ ߢ  ߢ ۤ ߢޣ ޣߢ ޣޢ ޢۤ ޢ áޢá צޢޢޢ !ƌ<%x~1 =I"Ua4':m3yL?RKޑdWjc|o{ & { #:PV hn!-9 E Q$*]#i%'&`'l_ 6yG ݣשnn Dnn$T: -š2%&p| 5n7\n:\)CF~nc;8[- a/Gno4XnX;nE,3E- t\ݰ}#bk4ݤ_ á&ݤ4_q˦aiGlXcuT4#uld prophesy, but that the weary and cold hand of death lies on my tongue.4 USYSTART                                                        `f%x~1 =I"U ^^ititit?RKޑdWjc|o{ &٬8>ķPV hn!- zozozodd*]#i%تPRETURN%+" T* /Pۡ k!!;תPZٹPlease Then  #צ!hold down the [CONTROL] or [CTRL]צ$key while you press the [RESET] key.ء لء  /ˡ%You can skip many steps in the longer problems with a little practice.5,Ï7 צ IMPORTANT REMINDERSצ When solving a problem, you may:7!1. type a question mark for help,7'2. press [ESC] for typing instructions,' and again to return to your problem. 7צ$For example, please press [ESC] now.& 6,٪PتP,צ . . . . . .U ,U:9צ[CTRL] XErase your answer׮9* צType a dot (t  ܢܢ ܢ8  ȡ&á .  V   ؂  ؂؂   ؂  ؂؂ @  S f  ߨ '7űEڦpositiveת٦upwardתݦaddתצadditionئ the same תb '7ŒNצnegativeצdownwardצsubtractצ subtractionئ opposite ת ۦan oddת ۦan evenת؂ x Kڨ٨FءThus,  צHere, ɡ" K@{Η צ~=~#צ this arrow represents Y P.YY ٨ȡJ@{Η  צ is undefinedF ɡ"$RڪPRQ٢٢# ؂ġ  Q   ٧ 8R٨IIġF-a؂ڪPHG Od ؏  z,  FSGNUM SGNHP MULTHELPVECTORHEDIVPWRHEADDHELP GETPROBDSTARTPROENDPROB m!J,VfrpP z , n Z`$<F.&T,z$p6Xl0 X8v;adsworth, Inc.ת(צBelmont, California 94002.(צa division of Wadsworth, Inc.(%Pascal Runtime System (C) 1979, 1980,ת(צ%1983 and 1985 by Apple Computer, Inc.("Portions of this software (C) 1979ת(yצby University of California.(dTelephone: 4O8-373-O728ת(  ;+ b)y any means -- electronicת(6#mechanical, photocopying, recordingת(!צ!or otherwise -- without the prior( $written permission of the publisher,ת((C) 1986 by Wadsworth, Inc.ת(צBelmont, California 94002.(צa division of Wadsworth, a ;'쥁b ;;;bتPRتPR צ .۪P٪P. ء&m K"form or bRETURN]End your answer9[SHIFT] צType an upper symbol9 [left-arrow]צErase a character9,ġ [CTRL] UצType "Undefined"9;ġ:Ǖġ;&צOne moment, please. $|8š;SOLVEׯ;SIMPMׯ넡5ń68צStart DENOMINATOR9צ[CTRL] BEnd denom. (go to BASELINE)׮9v; á Review Beginn ing lesson  .š TYPING REMINDERS[ESC] צSEE TYPING REMINDERS9? צ ASK FOR HELP9ǕɡCצ[o multiply)9[CTRL] FצFinished (no more steps)9 [up-arrow]תPb צ[CTRL] PPBegin Power (exponent)׮9צ [down-arrow]Pb [CTRL] BתPצEnd power (go to Baseline)9R:צ[CTRL] NStart NUMERATOR׮9[CTRL] D  ڀᕏǿȡ` ڂ ȡ  ɏ áhb ٪צLet's discuss 0ɡ .,צ%the number represented by this arrow.צؓ0á P Your answer: Pfڡ>צShall I repeat the explanation LZJf  >f&؂  ؂؂ @   times.)+  '7ű LukaWM aLukaWM p anyתkLukaWM  Note that צ power of a (šThe expression   means צ ȡ3צ( צ)á C(Factor repeated  #Ʋ'7ŵ צThe "exponent" or "power" P P! ".P P#צ().P P PR 0 ءf  '7ŵOur arrow starts at about  ,צ.-  צIt ends at about  #צ.$   צ.J}si_UK צSince our arrow points U), +צthe number it represents is _.צ./  R '7ŵOur arrow starts at about  ,צ.-  צIt ends at about  #@{Η@{Η ȡR ȡ@       =  ڊ >W.ƀצs is 3ƀp Eƀ.Fƀ'7űl˄lÍ% '7ű ڡp 2 tƀצ 'ƀp 9ƀ.:ƀlá time.תצ times.lšỲƀThis ƀWƀ must be repeated )ƀp ;ƀMƀnۡXml̀mʀȡHn ml'7ŵnnmmlńh̀ƀThe total of these repeated ƀƉlp ڡlá aaddת To multiply  ̀ƀ we must repeatedly ƀa&ƀצ 'ƀp 9ƀ.:ƀlá time.תצ times.l.)#p h0Qmmmآjm*ömآjÍآjm*áY p'7ŵ kaWMC9/ ker.'Thus, a % number times a *< number gives a LC^ answer.fצ)(Multiplying two numbers whose signs are )/;gives a C answer'7űkaWMC9/ %CakaWMC9/ CkaWMC9/ We recall that !צing %7צ numbers @צ results in a C answ  ڀᕏǿȡ` ڂ ȡ  ɏ áhb ٪צLet's discuss 0ɡ .,צ%the number represented by this arrow.צ : number is EaWצ.X 5 j '7űpWe recall that  !(" 4) = 8 Jצ. Lt'7űX$However, 0 times a number cannot be $ 6צ, 8   '7ŵ~'7űbLukaWM Mgives a a ȡ ..š4 ȡ)ń= ȡ2 á  XW آآ)  w , bY " ڢ (ٲ"𩀤 ̀2 -a-bת2 -a+bת2 a-bת2 צa+b2  a b ת2 2 2 2 צa b 2 2 2 צab2 צ(a)b2 aȡ=)تPɡ )P)! ̀ʀȡ)  Ïقق   bY " ڢ (ٲ"𩀤 ̀2 -a-bת2 -a+bת2 a-bת2 צa+b2  a b ת2 2 2 2 צھ0ȩń    c c   ū ũɫ   š   š ūȡ2ȡ .ؤ4t OOO Pء    ̀ƀ and ended at ƀ ƀצ, !ƀ  ̀ƀ ƀ.ƀOOO P ء ءML̀̀ʀʀȡ!ʀʀʀ̀á Lá M   ڡOOO Pء    ̀ƀ and ended at ƀ ƀצ, !ƀ  ̀ƀ ƀ.ƀOOO   to   צ. ÍM, ؏PȡO ١ء+  O Pء  Nyoe[Q '7űPK , so the sum is "e4.5 N:ˡ 2 e, both numbers are e), so the sum is 9eK.LN KIn this problem, K #-$K 6 = 9 K.LTef.gh צIn this problem,  #צ+$ 6צ = 9 Kצ.LMNyoe[Q צHer We subtract  צ by adding ) ;צ.<>dضNyoe[Q '7űWe add   by moving $[6צ, since > P is answer.)# '7ŵ Nڡ á ^( We recall that  !(" 4) = 8 Jצ. Lt آ آ  ^h)   ȡ ȡ    @{Η   ȡƶ צ System error.Hold [CTRL] and press [RESET]. n'Welcome to a new type of algebra class. á7(The following keyboard lesson is somewhat abbreviated צ in 2LINTRO ĩ++-Í)-č $*L  nHHx~r )f ٫ث&0#*4 *, ˡ`Q@**-*-*-*-****-+*+*+**-+*-*******-*******+++,*,-*----------**+++- -č ᓄ  Ą-áń Fn\PDl ȡáġ ġ)f ɩ+) ɶ  ˡQ á$This arrow represents ץ2Qآآ#צ~=~   ɡ :o! $$ $se enough.V  % ī    ^ ȡáġ ġ)f צ** rب ɩ LDo you want an explanation @ +  "צYou are cloΗ Undef.תצ   \ צHere is the correct answer:d  v   @{Η Undef.ת/ @{Ηآɡ٫ب ١  ۹* ; /" 246813)+ ١ تP  R&@{% > ȡ 詀á  +;CK?0.+2 $H**,, 2  š ɡp   ȡ% > ȡ 詀á  +;CK?0.+2 this demonstration version. צp$F " D^@$( B!+j,+j, ٪PQ <@**-*-*-*-****-*******-**-*******-*******+++,*,-*----------**+++-R|۪ڪ2 ,Ǹؕ  ٫ث   !< !\hall we try that one again  NQ+P+j+j,+j, ٪PQ <@**-*-*-*-****-*******-**-*******-*******+++,*,-*----------**+++-á=3using the [left-arrow] key to correct any mistakes.צat the keyboard. š  צ~~~~צ šئ " *áV   צS.Rצ4(Remember to press [RETURN] when you are finished.) Dáá7-When you see the flashing cursor, please type+צ#With my help, you are going to type~~~~צng the [left-arrow] key. 0_   ȡ šڝ _צF V ؍  That's right.4צPlease try againء)! when you see the flashing cursor8 ˡצ17^6*12צ16*12צ 21x^^0x+30yצ20x+30yDˡצ3*2=6צצp=2w+2hצ6צ^šئ^ٿ*However, you are going to make a mistake, /and then correct it usiצ8It is located near the right-hand end of the keyboard. צPlease find it now.צ;Let's try some examples of how we use the [left-arrow] key to correct errors in typing. ˡ ˡuestion mark.$Everyone makes mistakes in typing. One way to correct a mistake צ"is by using the [left-arrow] key, צ/which has a small arrow pointing to the left. "It looks something like this: <--end you don't know, and type a question mark.?ˡ?á+It is about 400,000 kilometers to the moon.צ%(You weren't expected to know that. )I just wanted you to practice typing "?")8I'll always try to help you if you type a q צ{6|3}=2P R">In fact, any number divided by 0 produces an undefined result.צ(To say that an expression is undefined, צByou hold down the key marked [CTRL] or [CONTROL] while typing "U".* +-+-ȡ* ~~~~~צ{ |0}P1+4+     = ,  P  +á'צLet's try another example.-%Remember, [CTRL] U means "undefined".++Z  W   0ȡ&پ~0پ!. >9There are many correct methods for doing these problems, צ.and there may be more than one correct answer.;Look for sh you type the letter X, צyour entire answer is erased.!Then you can re-type your answer.3Sometimes it is easier to erase your entire answer צ5with [CTRL] X than to use [left-arrow] over and over. ˡצ 1*2=4^2*2=4צx[2]+^ax[2]+bx+c=0P RD   \TF6 צby pressing [left-arrow].+However, another way is by using [CTRL] X. 4If you hold down the key marked [CTRL] or [CONTROL] while you type the letter X, צyour entire answer is erased.!Then you can re-type your answer.3Sometimes it is easier to erase your entire answer צ5with [CTRL] X than to use [left-arrow] over and over. ˡت瓡8 &1As you know, mistakes in typing can be corrected צby pressing [left-arrow].+However, another way is by using [CTRL] X. 4If you hold down the key marked [CTRL] or [CONTROL] while צ#and then correct it using [CTRL] X.  צ~~~~< T"٪PQ O@**-*-*-*-****-+*+****-**-*******-*******+++,*,-*----------**+++-RpR^ײؕצ#With my help, you are going to type~~~~jצצat the keyboard. ^ײšצ^צ*However, you are going to make a mistake,  ˡ 2[3] צe=mc[2] צc[2]=a[2]+b[2] ?ˡ!~~~~~ means "power starts here"and!~~~~~ means "back to baseline."<DJll in either the second box or the first box.تP  %ۡ.צ[CTRL] PP.[CTRL] BתP)ۡ. [up-arrow]תP.צ [down-arrow]P.Pvצ&Type to begin an exponent or "power".צAt the end of the exponent, !type to go back to the baseline.P-á(ײP) צ0*P = 0. TS 2צ'As you see, there is a difficulty here.U צSince 0 times any number is 0, צ1there is no way to fill in either the second box or the first box.Thus, the expression   צ)is meaningless; we say it is "undefined".Vf*צ3*2=6P* *צ{6|0}P* 6B8z צTS@{ΗhצNo, P-á(ײP) צ0*P = 0. TS 2צ'As you see, there is a difficulty here.U צSince 0 times any number is 0, צ1there is no way to fill in either the second box or the first box.   צ =צ means  TSTS  U U ,What number could be used in the second box?$(Type a question mark if necessary.)צTS@{ΗhצNo, e saw that     צ because >  .  Similarly, <      ,  צ0*צ= 6 .4 تPPRortcuts. I'll tell you if they are not correct.1Paper and pencil may be useful for some problems.۪Pױڂ/.0.0ȡ"/Ǹٕ. /؂/..,X jڪPױR  _6_צ <ق ؂" ƀުP_ݪP6ܪP ۪P_6 ̀ ̀ƀʀʀ̀ʀ̀ʀʀȡ2߂ʀʀ ʀ̀ ̀̀!Would you like to try that again  @   צIt's easy to remember that 0צLet's try it now."ئ*When the cursor returns, please try again.תP8 ?ˡצ"[CTRL] N means "begin Numerator",צ$[CTRL] D means "begin Denominator",צand9[CTRL] B means "Back to Baseline" (end the denominator). šJWe want a hint. Type G, or press arrow keys until "Get a 9To type a fraction, type [CTRL] N to start the numerator.'Type [CTRL] D to start the denominator.+Type [CTRL] B to go back to the base level.  צ {4|10}={2|5} {x[2]+1|x[2]-1} {1|u+1}-{1|u}blem." &Correct. This problem is now finished.     t x~ 0 f ( N  mplify the following expression:צ !+"-#dšJWe want a hint. Type G, or press arrow keys until "Get a hint" is lighted.צ "Get a hint." צ(Add or subtract. (This is your hint.) צ"Type either $-# or !+% or & .$-#צ!+%& ᓡ Type & .&צ @Type F, or press arrow keys until "Finished problem" is lighted.צ"Finished pro #! $!!!"!%!"!#!&!$!#! )Please simplify the following expression:צ !+"-#dšJWe want a hint. Type G, or press arrow keys until "Get a ETURN] selects the lighted line.Here are some examples.צ7Watch for instructions for each key you should press. *(Instructions will be in boxes like this.)!! "! The arrow keys will allow you to~~~~ask for a hint,צ~~~~ask for help,~~~~ask to type a step, or'~~~~state that the problem is finished.-Pressing arrow keys "highlights" your choice.+Pressing [Ry correct methods for solving longer problems. צYou can type a final answer, or several intermediate steps.צ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;CIM $: T7^dH|thRz Dh(the expression /?Í1 >  ٫ث", $. צ System error.Hold [CTRL] and press [RESET]. n   B پ á2 BQآjآjآjآj0P0آjآj0//'?ˡצPlease try again.~ܪPNow type the expression /?Í1 >  ٫ث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,,T ccnynynyABOOT  `f%x~1 =I"U ^^ititit?RKޑdWjc|o{ &٬8>ķPV hn!- zozozodd*]#i `( $ `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ޘޤޮ޴޵޺޹HLҩ%vHHLhhh h膀e ň8内e~l8吨L^ऐ 0 8`hh ~ h0 \L SLlvLL/ pL p8L ~ hI=+ \L ~襈I= ' %H$H'H&HLҩHHHHL Ҁ? ABzDF@GPtI$KL nN(kPQChSU焵V!cX_Z[^]k _#ǭ`xXb'dxehSgiQYjoNln9?oIqr|otEv7w߄y @{Η|½~v! ) `) e 6IiIi0&lhhhh 좊 m饀HHHHL 좊 mL8hhL Ҫ0 `Fff L~IIi`~ ? HHLҩ~ ? HHLhh88ePhhL i򅋩Fffeeeffffإ L0 `~ ?预 ? HHHHL 뢊 mLҢ~ ? HHHHLҥ~ 뢊 mLҺ^LҺ~&~& ILhhhh~ )ꢊ mL ꅊ Oꢊ mLҢ~ ?预 ? mLҥ~I~~ mLҥ~E )ꢊ mL I Oꢊ mLҢ~ ?预 ?Lѥ HHHHLҥ~E8 i  iL ҅ 8僅傅偨倐 8&&&&Ffff 颊 mLҥ~EfffFfff` eeee ` 8僅傅偅倅 ` `Ņ"$ņŇň ʼn8`~`~ ?预 ? mLҥ~ mLҥ~EhL rtLhhhhhhhhL8\潪]L7\Z][JHjHLhhhhh*68jh*vlhhjH*vjHHHlffff择ŋhhL `0&&&&0ƋƋhhL `&挥F8`8兰I襅FLѥ8Ɓ8 ри~ȱ~LҠ ULҥXiXYLh~hhh~ȑ~Lҥrehrseistehtueiuisu ʱrtLhLrtLhhhi0QhthuhettheuuhrhsherrhessXЋiʱrtusLhLtLhhhhhehehhhhhhehiehIihIiiŒ.Lc祔'ņŇ0 LR祆8ƇLR祆8厪HHLhhhhTLץT8~U~8~Xȥ~YT VLҥRSLȱȱLa x8񆅔ȥ񆅕 x iiL;楖 K䥘 K䥔 Kхх K lƄL`8ƛ`8Ƈ` 8` ^\_]`hh /Lhh LҠX lhhhhhihhhhLhthuhettheuui ʑtuL榅HHHAH@H > ]>HBC\8倅\]偅] ]H\ŎRRLҠX :LҠX :PQȑLҠXX /XY  0 LX :QHPH PȱPP꽥QLҠ RhPhQL RR8~S~\ȱ~]X i RHRH R~ȱRV8Z[ 8Z[LѠRȥSȥTȥUȥVȥWXiȥYiL_ht i~i8~~X~YiTiUR콥S8\ȥ]\]VWlX : ƎRSLȱȱ SL ȄHHLhh ~LPhhV~W\]~8傅~~8傅~8~~~:XiXY x8񆅚ȥ񆅛᭼HHl0 Lү8Ƈ8񆅈񆅉D>8񆅈,t8 u`޽hhLҭ߽H޽HLҭ޽LLhh HHLhh Lҩhhhhhehehh HHHH)U  c 0LI *LI -LI 3LI hhhhLIhh ) 9LI 
  • >) l ??ԬП8ƋȱHHHH`HHHHHH 0"01 ɃɁ1ح:/;089 "!歛筜䭝)VV#$6 </\z FLLIEHJh**F`F$Lө ޽޾ HHHH`HH,`\Xnl rl1 )% ۠)ͩ3ƊgƈЉ** 6`| BQRTWHHlRHHlTHHlVhhi a0<7) ` ` ޽` H Hl H Hl>޽ Insert boot disk with SYSTEM.PASCAL on it, then press RETURN# SYSTEM.PASCAL is not V1.3#lhLhxhmDŽ ,І 9LC " O ڧvߜߔ> Әߐ"Ӡ[Q:2xԶA׶wwwwwwwwwwwwwwwwӼԹԹԹԹԹԹԹ?? vXLALL{L   UFifhLޠ Uhhh~hXYhLޱ~р~iL'߰L+L#߈hhޅޅh~h~ޅ~ޅ pHHLҦpHHL @hhHHHHhhhhLݥ)L8内凅Lݥ) fj~) fj8~݅݅HHHH9ޅ9ޅHH~ HHHiHLҩHHLҩHHL~Ƃ~eʥƂFHHLҠX hh&ŎL0eeƎLҥ8包Ŏ 8吪8吪ƌLhh&eȹȹp)1)fjjj)?~Ōe~980~~i ~&&hhȱI%~I%ȥLhhh heȄ Ȅ~l `ۦ8e h9 0 ʚL `ۦņ hI9ʚL `ņ0 hʚL҅Ʌh Uѥi h&L.ڥhi ץheheHHLҠXXhh &heheHHHHeHHLhhhhhhȱ80 iff =݅=HHLh~hhhhh ݅%~~݅%Ń)ŀ!0E0~łLLXYXXYYHXHL_XYYHXHXXYeXXYLhrhshthuXs&trȑtLҠrrtLٱrtLLҺ~~LLҠ UhehheiHHLҠ UhehheiHHLhoLѥIiIi攥IiIiƔ8吥呰 ` of"f fofn8no8&&`ffofn&&`hhhh ץIiIiHHLhhhh ץHHLh~hhhE0ҩlLhh0HHLҨIiIiHHLҺ}}LhIihIiHHLҺ8Lҩonff nenoeofofnff`hh0 hhLhh"IiIiIiIi ץHHLҺHHLנnXXhhQX0XŗiX`0\XE0XLXŖC?8XX&XeYei无8XYLҥXiXYL h~hhh~&Zȥ[Ze~Z[e[8\Z][LL h~hZ~ȥ[~Lh~h~Zȱ~[潩LXHXHXe~XYLҠX~ 8倐~hrhsrHrHLLѠX~e~e~tu~LqhththhLҺh}~h}~Lhhh~hhe~~he~Lhrhshthu UL躽==LҺLhhIHIHLҩX Ѡ Uѥhelniemoni nooHnHLҠX Ѡ Uѥhelniemo hnhnLҠX Uѽeh~ei~H~HLҠX Uѽeh~eih~h~LҠX UѽeheiHHLh~hȱ~H~HLh~hhh~ȥLҠXȘ ~X)XYҩHHLҠXHXHL飨RHRHLҠ qeRneSo nHnHLҠ qeReSi HHLҠ qeRneSo hnhnLèPHPHLҠ qePneQo nHnHLҠ qePeQi HHLҠ qePneQo hnhnLҠX Ѡ Uѥhelniemo nHnHLҠ      id޽߽ H޽H V / PRȥQRRȱR8Ɓ8R RLҥXiX-Y)XiX YHHXYX lXYX lh)hLhX0 eXXYLeT~eU~8~X~YLֶW =%3ILXiXYX h&i` hi`XXYX *` `RlSml~ȱlm~l``Z罅[潩`޽~@<8潍罅Z\]b[ ~р ȱ~р~р %v HHLҩHHLҢh~E0~E~~~Ղ0L+ߐL+h)~hh)h~L#ߩ vhhh~hE0Ł~ŀHJ@0D:hhLhLҩLҩH