ZXTape! 0Created with Ramsoft MakeTZXPYTHAG3    N0:0:0::236099\,502:0:0:0 q$="y"x -z$="  " K12 ,10 ;1;4;"PLEASE WAIT";0;0 "" .a=07:a,0;1;z$:a (H12 ,6;4;1;" LOADING PROGRAM ";:0 -*18,5;" " .13 ,0; / 0 2 "file" <*:15,0;"Leave tape running" F"" P*15,0;"Stop and rewind tape" R"clear (y/n) ?";q$ Tq$="y""address ? ";x ZJ17,0;"Type in file name in ";1;"UPPER CASE";0 n"Filename",a$ o015,0;"Recording " p517,0;" " x a$10 "logo"16384@,2304  '10 ,5;"Load main program" )12 ,5;"SAVE""file"" LINE 2" Z&  QnAPYTHAG3logo @ ??80?߀????>?#|?~???|?|~?8???1???<???????<?0~|??~?~|?|~?>??#???8??????1???????~<?|??|~?|?|~?|?|~???9??>?? ?????8<0p??>?x?~Yfile h&@h>G\h2Fl$(3,3,1):l(3,3):f$(3,5) P _Gc=13:l$(c,1),l$(c,2),l$(c,3),f$(c):c n="h","a","b","a+b","a","h","b","h-b","b","h","a","h-a" }#a=07:b:"a"+a,b:a E24,36$,8,16,60<,0,0,0 2090* **space-key to continue** 80P .3,10 O1;21,31;8;9 ;"*":30:=""0215 #21,31;8;" ": **clean lines**  0170 Ec=v2v1-1:c,0;" ";:c " 1**input a number 2 digits** @30:.3,30 Oz=0:z$="":fs=0: ^,21,z;4;0;1;"N" m 2 |a$= .a$=13 fs=1z=1380| a$=12 515 5a$=13 z0a=z$:.05|L,20: &a$<46.ůa$>579350^ a$=47/350^ $fs=1Ưa$=46.350^ z=31350^ a$=46.fs=1 N4;0;21,z;a$:.05|L,20:z=z+1:575? z=0350^ a$=12 z>021,z-1;1;4;0;"N":21,z;" ":.05|L,20:z$(z)=46.fs=0 !#z=z-1:z$=z$(z):350^ 0!a$=13 z0a=z$: ? z$=z$+a$ N 0350^ ] l0:0:2::10 :.1}L,10 :0,11 ;" " {.1}L,15 4,1;" " .1}L,20 \10 ,13 ;" " .1}L,25 Ɣ15,1;" " .1}L,30  **input formulae 30:.3,30 z=0:z$=""  ,21,z;4;0;1;"F" / 3 >a$=:a$="^"a$="" Ma$=12 920 \5a$=13 z0a$=z$:.05|L,20: ka$<33!800  zz=31800  N4;0;21,z;a$:.05|L,20:z=z+1:935 a$=12 z>021,z-1;1;4;0;"F":21,z;" ":.05|L,20:z=z-1:z$=z$(z):800   800   z$=z$+a$  800  ***number string to 1dp n$=(n+0.5):l=n$ c=1̱n$ n$(c)="."l=c+1 c n$=n$(1l)  .**check input of string = z=0 L1a$<1űa$>10 z=1:1235 [s$="" j&k=1̱a$:a$(k)=" "1160 y s$=s$+a$(k) k a$=s$ i=1̱a$ Oa$(i)<43+(a$(i)>502Ưa$(i)<94^)ůa$(i)>104hz=1 i  ***draw triangles  5 (x1,y1:a1,0:0,b1:-a1,-b1  **labelled triangle -Bx1=177:y1=104h:a1=62>:b1=47/:1250 1v1=14:v2=21:245:16,0;4;" So ";l$(n,1);"=";l(n,2);"-";l(n,3);"":1700 ~v1=14:v2=21:245:16,0;4;" So ";l$(n,1);"=";l(n,2);"+";l(n,3);"" =18,0;6;" So calculating to 1 dec place" 19,10 ;6;l$(n,1);"=":7:96`,13 :31,0:96`,10 :31,0 A3051:21,0;" " *(a-l(n,1))<0.05|L1805  7b=b+1:b>1.3,10 :1805  .3,10 :21,8;6;" No, try again":f=1100d:f:21,0;" ":3051:21,0;" "  1745  019,16-l(n,1);l(n,1)  +**the formulae :.5:1,0;" The Formulae:" ?,f=13:1+f,5;f:f I^7:2,7;"h=a+b";3,7;"a=h-b";4,7;"b=h-a" X g**ending routine vH0:6::0,10 ;5;1;"LESSON THREE" 15,1;"That completes Lesson Three." 7,1;"If you would like to go over"'" LESSON THREE again, ";10 ,13 ;2;6;"PRESS R":'" otherwise:-";12 ,13 ;6;1;"PRESS S" =""1955 ="R"Ŧ="r" ="S"Ŧ="s"2015  1955  z=0: 7:7,0;" You should now prepare for the POST TEST by working through the workbook again.":170 O11 ,1;"When you are ready for the POST TEST, press any key."  502:=""2060   5000 ***core 9U620l:6;21,10 ;"LESSON THREE":.1}L,35#:170 H 2255 W 23608 f 3035 u 3230  3410R  3590  3755  1895g  **summary of lessons 1-4 6:0,10 ;1;6;"LESSON THREE" 5:2,0;"In the last two lessons you wereshown how to apply the theoremof Pythagoras, expressed as aformula, to problems where giventwo sides of a right angledtriangle ABC, you could find thelength of the third side.":170 26:10 ,0;" The formulae were:" j7:12 ,9 ;"AC=AB+BC";14,9 ;"AB=AC-BC";16,9 ;"BC=AC-AB" 6:18,0;"In this lesson you will learnsimpler forms for these form-ulae.":v1=2:v2=21:245 ) 8**teaching section G V4280:1310 e14:2,0;" If in triangle ABC" t" we call the length" " of the hypotenuse" 9" AC, h";4;"; ";:5,8;"the length" ;" of the side AB, a; " (7,0;" and the length of" ," side BC,b;":8,12 ;"then we" " can write the" " formulae:" j170:6:13 ,1;6;"AC=AB+BC as":13 ,19;5;"h=a+b" M15,1;"AB=AC-BC as":15,19;5;"a=h-b" M17,1;"BC=AC-AB as":5;17,19;"b=h-a" $v1=0:v2=21:245 8,1;2;"PLEASE NOTE-";7;10 ,1;"When entering formulae in the following exercises, enter the '' symbol by pressing '^'":14,1;"The symbol '^' is on the h key.":v1=0:v2=21:245 (4280:1310 727:2,0;" Let's see if you" F*" can remember these"'" three formulae." U(5,0;" For the triangle" d" shown,complete the" s " following form-"'" ulae:" >b=0:10 ,2;"1";4;" h=";:755 621,0;" " a$=f$(1)2780 7b=b+1:b>1.3,10 :2780 .3,10 :21,0;6;" No, try again":f=1100d:f:21,0;" ":755 2705 (10 ,8;6;f$(1) Fb=0:12 ,2;7;"2";4;" a=":755 621,0;" " a$=f$(2)2885E 7b=b+1:b>1.3,10 :2885E '.3,10 :21,0;6;" No, try again":f=1100d:f:21,0;" ":755 6 2810 E(12 ,8;6;f$(2) TFb=0:14,2;7;"3";4;" b=":755 c621,0;" " ra$=f$(3)2990 7b=b+1:b>1.3,10 :2990 .3,10 :21,0;6;" No, try again":f=1100d:f:21,0;" ":755 2915c (14,8;6;f$(3) 5:17,0;" Now we will put these new formulae to work in a variety of different problems.":v1=1:v2=21:245  **problem one +:3:0,1;"PROBLEM ONE" 4280:1835+ 6:5,0;" A ladder leans"'" against a wall,its"'" foot is 1.5m from"'" the wall and it"'" reaches 3m up the"'" wall. How long is"'" the ladder?" &L4:14,2;"First draw a diagram..":3935_:170 54:16,2;"Now identify the right angled"'" triangle.":x1=195:y1=96`:a1=28:b1=546:7:1280 Dv1=14:v2=21:245:n=1:l(1,1)=3.4Y:l(1,2)=1.5@:l(1,3)=3:1385i S%v1=14:v2=21:245 b5:15,0;" Therefore the ladder is 3.4m.":200,46.:31,0:200,43+:31,0 qzv1=14:v2=21:245:17,0;" NOW TRY THE TWO QUESTIONS IN EXERCISE 3a IN THE WORKBOOK." $v1=0:v2=21:245  **problem two +:3:0,1;"PROBLEM TWO" 4280:1835+ 4:5,0;" Again a ladder,"'" this time it is 7m"'" long and leans"'" against a wall to"'" reach a window 5.5"'" metres up the"'" wall. How far is"'" the foot from the"'" wall?" L7:15,2;"First draw a diagram..":4010:170 7:17,2;"Now identify the right angled triangle.":x1=204:y1=96`:a1=19:b1=63?:7:1280 v1=15:v2=21:245:n=2:l(2,1)=4.3 :l(2,2)=7:l(2,3)=5.50:1385i %v1=14:v2=21:245 16,0;" So, the foot of the ladder is"'" 4.3m from the wall.":8,30:31,0:8,27:31,0 %v1=15:v2=21:245:6:18,0;" NOW TRY THE TWO QUESTIONS IN EXERCISE 3b IN THE WORKBOOK." 4$V1=0:V2=21:245 C R**problem three a-3::0,1;"PROBLEM THREE" p4280:1835+ |6:6,0;" Find the length"'" of a diagonal of a"'" rectangle that is"'" 6cm long by 5cm"'" wide." L4:14,2;"First draw a diagram..":4100:170 4:16,2;"Now identify the right angled triangle.":x1=174:y1=100d:a1=63?:b1=44,:7:1280 v1=14:v2=21:245:n=1:l(1,1)=7.8y:l(1,2)=6:l(1,3)=5:1385i:v1=14:v2=21:245 &v1=14:v2=21:1070. ʟ5:15,0;" Therefore the diagonal is":" 7.8cm long.":7:8,38&:39',0:8,35#:39',0 كv1=14:v2=21:245:6:18,0;" NOW TRY THE QUESTIONS IN EXERCISE 3c IN THE WORKBOOK." $v1=0:v2=21:245  **problem four ,:3:0,1;"PROBLEM FOUR" $4280:1835+: 34:5,0;" The equal sides"'" of an isosceles"'" triangle are 8.6cm"'" in length and the"'" base is 5.2cm."'" Find the height of"'" the triangle." BL5:14,2;"First draw a diagram..":4160@:170 Q5:16,2;"Now identify the right angled triangle.":x1=178:y1=90Z:a1=29:b1=69E:7:1280 `v1=14:v2=21:245:n=3:l(3,1)=8.2333:l(3,2)=8.6 :l(3,3)=2.6&fff:1385i:v1=14:v2=21:245 o6:15,0;" The height of the triangle is"'" 8.2cm":7:8,38&:39',0:8,35#:39',0 ~v1=14:v2=21:245:6:18,0;" HAVE A GO AT THE QUESTIONS IN EXERCISE 3d IN THE WORKBOOK." $v1=0:v2=21:245  **problem five ,3::0,1;"PROBLEM FIVE" 4280:1835+ ش6:5,0;" The sides of a"'" rhombus are 4.5cm"'" and the length"'" of the longest"'" diagonal is 7.6cm."'" How long is the"'" shorter diagonal?" L4:14,2;"First draw a diagram..":4220|:170 4:16,2;"Now identify the right angled triangle.":x1=176:y1=120x:a1=31:b1=20:7:1280 v1=14:v2=21:245:n=3:l(3,1)=2.4:l(3,2)=4.5:l(3,3)=3.8s333:1385i %v1=14:v2=21:245 #7:15,0;" Half the shorter diagonal is"'" 2.4cm, so the diagonal is"'" 4.8cm.":2:8,30:39',0:8,27:39',0 2v1=14:v2=21:245:5:18,0;" NOW, TRY THE PROBLEMS IN EXERCISE 3e IN THE WORKBOOK." A$v1=0:v2=21:245 P _ **diag 1 n/5:170,95_:70F,0 }02:c=29 :c,28;"":c i5:195,96`:28,546:-2,1:-28,-546:2,-1 M7:6,29;"b";11 ,26;"a";6,24;"h"   **diag 2 /5:170,95_:70F,0 06:c=29 :c,28;"":c  5 `204,96`:19,63?:-2,1:-19,-63?:2,-1 M7:6,29;"b";11 ,26;"a";6,25;"h"   **diag 3 {5:175,100d:63?,0:0,44,:-63?,0:0,-44,:63?,44, "73:10 ,26;"a";6,30;"b" 1 @ **diag 4 O~178,90Z:58:,0:-29,69E:-29,-69E:178+29,92\:0,-4 ^77:6,22;"h";11 ,24;"a" m | **diag 5 5:176,120x:31,-20:32 ,20:-32 ,20:-31,-20:63?,0:-32 ,0:0,2:0,-4 63:7,27;"a";4,28;"h"  **box 7:162,173:91[,0:0,-99c:-91[,0:0,99c:165,170:85U,0:0,-93]:-85U,0:0,93]  -Q(8):R(8):L$(8,8)  $c=18:Q(c)=0:c ( w=0 2 6000p **draw triangle** W7:177,104h:62>,0:0,47/:-62>,-47/  **draw triangle PQR**  5610 N3:9 ,21;"P":9 ,30;"Q":2,30;"R" & 0 : D**draw triangle ABC** N 5610 XN3:9 ,21;"A":9 ,30;"B":2,30;"C" v **draw triangle hab**  5610 N3:5,25;"h":9 ,26;"a":6,30;"b"  0  **ending routine** F0:6::0,11 ;2;7;"POST TEST"  25,2;"That completes the Post Test." 7,1;"If you would like to have an-":" other go at the Post Test:- ":10 ,13 ;6;2;"PRESS R"::" otherwise:-":12 ,13 ;1;6;"PRESS S"  =""5920  *="R"Ŧ="r"5980\ 4="S"Ŧ="s"5960H > 5920  RE17,10 ;4;"Bye for now!":23636T\,255: \ z=1 f p ***CORE*** zS620l:21,11 ;6;"POST TEST":.1}L,35#:170  6140  67106  6870  7030v  7190  7370  7550~  7740<  7920  6350 #5880:z=15000  **introduction** =5::0,11 ;2;6;"POST TEST" 52,0;" This Post Test contains 8" #" questions matched to the" $#" minimum objectives given in" ." the workbook." 8=4:7,0;" Your answer to each question" B#" is checked but you will not" L#" know if you have answered" V5" correctly until the end of the test.":170 `>6:12 ,0;" At the end you will be told" j#" your score and a list of the" t#" questions you got wrong," ~#" together with recommendations" " for future study." >7:18,0;" Because of a randomising" #" feature some questions will be" #" different each time you run" 2" the test.":v1=0:v2=21:245    **results** 1:4:0,12 ;2;"RESULTS" 72,5;"You scored ";8-w;" out of 8." .6390:c=18:R(c),L$(c):c s1,"1",1,"1",2,"2",2,"2",2,"2",2,"2 and 3",3,"2 and 3",3,"2 and 3" w=064502  w=16510n w>16610 $v1=0:v2=21:245 ( 2**all right** <5:4,0;" WELL DONE, I suggest you look over the programs and do the Post Test at regular intervals as suggested in the booklet." d n **1 wrong** x( c=18:Q(c)=0w1=c c B5:4,0;" You got just question ";w1;" wrong" #" which is not so bad, so I" " suggest you look over the lessons again,studying lesson"'" ";r(w1);" carefully and then have another go at the Post Test."  **many wrong** =5:4,0;" Not so good, you got the" "" following questions wrong:-":  7 c=18 Q(c)=16670 &" (";c;"), so redo Lesson(s) ";L$(c) c ::6;" Then have another go at this Post Test." , 6**question one** @66::0,10 ;3;"QUESTION ONE" J43,0;" The theorem of Pythagoras" T#" applies to a triangle if and" ^" only if that triangle is:-" h*5:7,4;"1 Isosceles" r#9 ,4;"2 Equilateral" | 11 ,4;"3 Scalene" %13 ,4;"4 Right Angled" &15,4;"5 None of these" >19,0;4;" Enter a number between 1 and 5" A3051:21,0;" " +A=4Q(1)=1:6850  w=w+1 $v1=0:v2=21:245  **question two** -:0,10 ;3;"QUESTION TWO"  5640 14:2,0;" The hypotenuse in" " the right angled" " triangle PQR, is" " the side:-" #7:8,3;"1 PQ" &10 ,3;"2 PR" 012 ,3;"3 QR" :>5:19,0;" Enter a number between 1 and 3" DA320@:21,0;" " N+A=2Q(2)=1:7010b X w=w+1 b$v1=0:v2=21:245 l v**question three** .:0,9 ;3;"QUESTION THREE" 16:2,0;" For the right" " angled triangle" " ABC, using AB, BC" " and AC for the" " lengths of the" " sides, state the" " theorem of" " Pythagoras as a" " formula.":5700D A755:21,0;" " IA$="AC^2=AB^2+BC^2"A$="AC^2=BC^2+AB^2"Q(3)=1:7160  w=w+1 17,9 ;7;A$ $v1=0:v2=21:245   **question four**  /:0,10 ;3;"QUESTION FOUR" * 5700D 415:5,0;" For the triangle" >" ABC shown,complete" H" the formula using" R" AB, BC and AC as" \" the lengths of the" f " sides:-" pr=(2*)+1 z:r=117,9 ;4;"AB=":7310 #17,9 ;4;"BC=" A755:21,0;" " W(r=1A$="AC^2-BC^2")(r=2A$="AC^2-AB^2")Q(4)=1:7340  w=w+1  17,13 ;6;A$ $v1=0:v2=21:245  **question five** /:0,10 ;3;"QUESTION FIVE"  5760 15:5,0;" For the right" " angled triangle" " shown, using the" " letters h, a and b" " state the theorem" " of Pythagoras by" $" completing the" . " formula-" 8#6:17,11 ;"h=" BA755:21,0;" " L;A$="a^2+b^2"A$="b^2+a^2"Q(5)=1:7520` V w=w+1 ` 17,14;7;A$ j$v1=0:v2=21:245 t ~**question six** -:0,10 ;3;"QUESTION SIX"  5760 14:5,0;" Again using the" " letters a, b and h" " for lengths of the" " sides of the right" " angled triangle" " shown, complete" " the formula-" r=(2*)+1 ;r=117,11 ;7;"a^2=":7680 $17,11 ;7;"b^2=" A755:21,0;" "  S(r=1A$="h^2-b^2")(r=2A$="h^2-a^2")Q(6)=1:7710  w=w+1  17,15;5;A$ ($v1=0:v2=21:245 2 <**question seven** F.:0,9 ;3;"QUESTION SEVEN" PJa=(*7)+3:b=(*7)+3:h=(a^2+b^2) Z65700D:9 ,26;a:6,30;b d16:5,0;" Find the length" n" of the hypotenuse" x" to 1 decimal place" " for the right" " angled triangle" " ABC, where AB=";a;"cm" " and BC is ";b;"cm." *17,11 ;5;"AC= cm." A3051:21,0;" " (17,14;5;a;"cm. " 2(a-h)<.05|LQ(7)=1:7890  w=w+1  17,14;5;A$ $v1=0:v2=21:245  **question eight** .:0,9 ;3;"QUESTION EIGHT" G5760:r=(*2)+1:r=179906:7960  8120 17,15;A;"cm. " "$v1=0:v2=21:245 , 6 **find a** @`b=(7*)+3:h=(7*)+b+1:5,26-h;h:6,30;b J25:5,0;" For the right" T" angled triangle" ^" shown, where h=";h;"cm" h" and b is ";b;"cm, find" r" the length of a to" |2" one decimal place.":aa=(h^2-b^2) )7:17,13 ;"a= cm." A3051:21,0;" " 3(a-aa)<.05|LQ(8)=1:8110  w=w+1   **find b** caa=(7*)+3:h=(7*)+aa+1:5,26-h;h:9 ,26;aa 25:5,0;" For the right" " angled triangle" " shown, where h=";h;"cm" " and a is ";aa;"cm, find" " the length of b to" 2" one decimal place.":b=(h^2-aa^2)  17,13 ;"b= cm." A3051:21,0;" " 2(a-b)<.05|LQ(8)=1:82400 & w=w+1 0 & 20 &"file"9899&: '"" _}bh>/habahbbha2a+bh-bh-a