REVISION 6 68 20:0::"":0,0;"":"" REV @m6lmm6mmm6lmm6mmm mammammm mammammm6lmm6mmm6lmm6mm` ma lal` ma lalmm`6mmmmmm`6mmmm` ma lal` ma lalm amlaml` ma lalmmammlm amlamlm `mlalmmamml` alalm `mlal` ma lal` alalm amlaml` ma lalm6l`mmlm amlaml ` lalm6l`mml` alaml ` lalm mamlal` alamlm `mlamlm mamlalm6l`lmlm `mlaml` ma lalm6l`lml|B<><<|~B><>B<BBD@B@B@B@Bb@BBDbBB~(<@<B|B<BR@BBBR@|B@|@BBJ@B~BJN@BBBBD@$BBF@BBDFB@B<><<B~><>B<8888888888888888888888888888888888888888888888888888888888888888vPROG1 /,A/5:5:1:  B=1 zG$=" O *************** PHYSICS *************** " (8,10 ;1;" REVISION"  B=B+1 B=40 20 )8,10 ;1;" REVISION " 5 E18,16;" SCISOFT 1983":200:0,0;"" S=111 M=17 ";M;1;0;"SCISOFT"; M S  100H S=118 S  !^6,0;1;"PLEASE KEY IN YOUR NAME THEN PRESS ENTER. " "A$ #A$=""34 $A$>1834": %4:2,0;6;"HELLO THERE ";A$;"." &I4,0;"SO YOU THINK THIS WILL PASS YOUREXAMINATION FOR YOU?" '17,0;"WELL SORRY ,BUT IT WILL NOT." (B,,"WHAT IT WILL DO IS SHOW YOU WHATYOU CAN DO TO HELP YOURSELF." )'13 ,10 ;1;"HOWEVER" *d16,0;"THE MOST IMPORTANT LESSON IS THAT THERE IS NO SUBSTITUTE FOR HARD WORK." -?20,0;4;" PRESS ANY KEY TO CONTINUE. " .""46. /=""47/ 0 2,6;"PLEASE KEY ONE OF THE FOLLOWING" 4A4,0;1;"1.";0;" >6 MONTHS TO EXAM" 6B6,0;1;"2.";0;" 3-6 MONTHS TO EXAM" 8B8,0;1;"3.";0;" 2-3 MONTHS TO EXAM" <@10 ,0;1;"4.";0;" 1 MONTH TO EXAM" A;12 ,0;1;"5.";0;" THE BIG DAY" F""70 G=""71 H<"1"Ŧ>"5"70 IZ= JZ<1Z>5 70 KZ*1000z   9000(# !,,"From a LESS dense to a MORE" "Dense medium, light is bent" "TOWARDS the NORMAL"  40;1;"Sin i/Sin r = REFRACTIVE INDEX" ,,"(SNELLS LAW)" *",,"WORDS : Angles of incidence," 4"Reflection + Refraction" H',,1;"(BETWEEN RAY AND NORMAL)" Q""849Q R=""850R    4;G$ (17,5;1;0;A$ A=16@ S=110 -15,10 ;1;2;"FAIL" S S=110 -15,10 ;1;4;"PASS" S A C21,0;7;1;"ITS MAKE YOUR MIND UP TIME." ""1014 =""1015  R0,0;"I WOULD SUGGEST THAT IT IS TOO EARLY TO BEGIN YOUR REVISION." Y,,,,"ARE YOU SURE THAT YOU ARE DEVOTING SUFFICIENT TIME TO SOLVING PROBLEMS?" 7,,,,"IS YOUR TEACHER HAPPY WITH YOUR MARKS IN TESTS?" A,,,,"YOU COULD BEGIN WORK ON MAKING ABOOKLET OF CONCISE NOTES." 721,0;1;"KEY X TO SEE AN EXAMPLE." =""1054 !="x"400 "="X"400H $ )90,0;7;"MAKE YOUR REVISION BOOKLET." .64,4;1;"1.";0;" CONCISE." 6T7,4;1;"2.";0;" INTERESTING. (USE COLOUR TO UNDERLINE)" =Q11 ,0;"REMEMBER A CLEAR DIAGRAM IS OFTEN WORTH PAGES OF NOTES." GD16,0;"TRY TO SPEND SOME TIME DOING EXTRA READING." L M*1;"YOU WILL NOT FIND TIME LATER." N03:40(,100d:180,0 O/3:40(,99c:180,0 P/3:40(,98b:180,0 R 1 S""1107S T=""1108T V [86,4;0;7;"BUT! ABOVE ALL." ` 80 e:10 ,0;6;"UNDERSTAND THE WORK NOW!!!!" j516,0;"IT WILL BE SO MUCH HARDER LATER" o"IN THE COURSE TO CATCH UP." t""1140t u=""1141u ~ 48@  m6;"THIS IS THE BEST POSSIBLE TIME TO BEGIN A SERIOUS PROGRAMME OF REVISION. "  [,,,,1;"1.";0;" FIND A PLACE WHERE YOU CAN WORK REGULARLY UNDISTURBED."  V1;"2.";0;" GET FROM YOUR TEACHER A BREAKDOWN OF THE SYLLABUS."  Y1;"3.";0;" WRITE DOWN A TIMETABLE OF TOPICS TO REVISE WEEK BY WEEK"   1;"4.";0;" WHEN YOU HAVE LEARNED EACH TOPIC THOROUGHLY AND ARE ABLE TO ANSWER PROBLEMS SET THEN YOU SHOULD MAKE BRIEF NOTES IN YOUR REVISION NOTEBOOK."  ""2070 =""2071  400H 4 >S"USE THE REVISION NOTES INCLUDED AS EXAMPLES, NOT SUBSTITUTES FORYOUR OWN NOTES." C Hn"BY CONDENSING FROM TEXT BOOKS AND FROM YOUR CLASS NOTES YOU WILL EXTRACT AND REMEMBER THE KEY FACTS." R \"MAKE YOUR NOTES INTERESTING-USE PLENTY OF COLOUR TO UNDERLINE THINGS(E.G.FORMULAE)THAT YOU PARTICULARLY WANT TO LEARN." aD"REMEMBER A CLEARLY LABELLED DIAGRAM IS WORTH PAGES OF NOTES." f k8"ANSWER AS MANY PAST PAPERS AS YOU CAN GET HOLD OF." p ""2200 =""2201  7000Z   4;G$ (17,5;1;0;A$ -15,10 ;1;4;"PASS" A21,0;1;7;"THIS SHOULD THEN BE YOURS" ""2994 =""2995  50H  *6;"SO YOU HAVE WOKEN UP AT LAST."  &6;"EH? ";1;0;A$ {6,0;1;"YOU";0;" REALLY HAVE GOT YOUR WORK CUT OUT IF YOU ARE TO STAND MUCHCHANCE OF A PASS."  K"THEY DO NOT HAND OUT PASSES JUSTBECAUSE YOU HAVE ATTENDED THE COURSE."  *"YOUR FUTURE LIES WITH ";1;"YOU."  M1;"STOP KIDDING";0;" YOURSELF- YOU ARE ALMOST AN ADULT NOW."  \"STOP WATCHING THE TV. USE THE ";1;"TIME WISELY";0;" EG.ON REVISION NOTES" ""3060 =""3061  2025}    4;G$ -15,10 ;1;2;"FAIL" (17,6;1;0;A$ H21,0;1;7;"THIS IS WHAT YOU ARE HEADING FOR" ""4005 =""4006  06;"PANICKING EH? ";1;0;A$  ]"IF THIS IS THE FIRST TIME YOU HAVE THOUGHT ABOUT REVISING THENWE SUGGEST YOU TRY PRAYER"  "HOWEVER IF YOU HAVE: "  91;"1.";0;" MADE OUT A REVISION TIMETABLE"  91;"2.";0;" ANSWERED LOTS OF PAST PAPERS."  41;"3.";0;" PREPARED + LEARNED SOME " 3;"REVISION NOTES."  51;"4.";0;" REDUCED YOUR SOCIAL LIFE." ""4046 =""4047 A=1100d ,17,8;0;7;"THEN" ,17,8;2;0;"THEN" A -17,14;1;"AND ONLY THEN"  ',,"MY DEAR ";A$;" DO ";1;"YOU" /,,"STAND MUCH CHANCE OF ";1;"PASSING." ""4115 =""4116  M6;"YOUR REVISION TIMETABLE WILL HAVE TO BE DRASTICALLY BRIEF. "   !-4;"E.G. WEEK 1 MAGNETISM " " $17;5;"WEEK 2 HEAT " ' ):3;0;5;"WEEK 3 ELECTRICITY " , .#"PICK A SINGLE TOPIC EACH NIGHT." / 1-"LEARN THE KEY FACTS DIAGRAMS ANDFORMULAE." 2 32"THEN DO ";1;"SOME";0;" PROBLEMS." 4 5n"REMEMBER THAT EXAMINATIONS ARE ACOMPETITION AND ONLY THOSE WHO KNOW THE WORK WILL WIN THE PRIZEOF A PASS." 6""41506 7=""41517 : ; 7040\ E 50H  =0,6;6;"GOOD LUCK ";1;0;A$ ?4,0;"REMEMBER TO ";1;"READ THE QUESTION."  @,,"CHECK THAT YOU HAVE ANSWERED THERIGHT NUMBER OF QUESTIONS."  ;,,"PACE YOURSELF AND LEAVE TIME AT THE END FOR CHECKING."   n,,"BUT ABOVE ALL DO SUFFICIENT REVISION SO THAT YOU GO INTO THEEXAM ROOM FEELING ";1;"CONFIDENT." ""5100 =""5101  B"MOST EXAM BOARDS ADVISE YOU ON HOW LONG TO SPEND PER SECTION."  ,"TRY TO STICK TO THIS + OR - 10 MINUTES."   n"USE ";1;"THE MARKS PER";0;" QUESTION WHICHARE OFTEN PRINTED AT THE SIDES AS AN EXTRA GUIDE."  }"IF YOU WISH TO CHANGE AN ANSWER THEN DO SO CLEARLY IF THE MARKERCANNOT DECIPHER WHAT YOU HAVE WRITTEN THEN ZERO MARKS."  "LEAVE SOME TIME AT THE END FOR CHECKING 1) THAT YOU HAVE ANSWERED THE CORRECT SECTIONS 2) THE RIGHT NUMBER OF QUESTIONSC)CHECK FOR OBVIOUS ERRORS." (""5160( )=""5161) 2 < 50H X Y11;0,6;"REVISION TIMETABLE." ] b7,,,,"BREAK THE SYLLABUS DOWN INTO SENSIBLE PARTS." g lO,,7;"E.G. WEEK 1 LIGHT REFLECTION PLUS REFRACTION. " q v0,,4 ;" WEEK 2 LENSES + MIRRORS " x {8,,0;2;" WEEK 3 PROPERTIES OF WAVES." |""7036| }=""7037}  *0,6;1;"PAST PAPERS."   >,,"CHECK THAT IT IS RECENT. (MANY SYLLABUSES HAVE CHANGED)"  C,,"DO NOT FOOL YOURSELF BY ONLY ANSWERING THE EASY QUESTIONS."  1;"WORK ON YOUR OWN."  1,,"YOUR FRIENDS WILL NOT BE THERE ON THE DAY." ""7090 =""7092  -0,6;1;"REVISION NOTES."  ?,,,,"AS THE DAY GETS CLOSER THESE WILL BECOME INVALUABLE."  .,,"USE THE ONES WE PROVIDE ONLY AS A GUIDE."  O,,4;"MAKE YOURS THOROUGH,COLOURFUL AND ABOVE ALL INTERESTING. "  /,,1;"BUT DO NOT FOOL YOURSELF. "  O,,6;"ONLY IF YOU LEARN THEM PROPERLY ARE THEY ANY USE TO YOU. " ""7155 =""7156  *0,6;1;"SOCIAL LIFE."  Q,,,,6;"THIS IS WHERE IT SHOWS IF YOU REALLY WANT TO PASS. "   G,,"AS THE EXAMS APPROACH THEN 2 EVENINGS MAXIMUM PER WEEK OUT."  #,,"AND IN THE LAST FEW WEEKS...."   %8,,2;0;"EXPECT NO SOCIAL LIFE AT ALL. " *""7210* +=""7211+ 0 4 #( #2'40(,140:180,0 #<6 100d,140:0,35# #F)100d,140:-30,35# #P(100d,140:30,35# #Z(100d,140:0,-35# #d)100d,140:13 ,-35# #i 1 #n&0,0;2;"Incident" #p(0,17;2;"Reflected" #r!1,0;2;"ray" #t"1,17;2;"ray" #v"3,23;7;"AIR" #x$5,23;0;"GLASS" #z 2,11 ;0;"i" #|G8,5;"Normal":8,15;2;"Refracted ray" #} 0 #~8,13 ;"r" # b zedGs O *************** PHYSICS *************** A >EQUNIT ( ( 5:5:1: &5,11 ;1;"SCISOFT" *14,5;"EDUCATIONAL PROGRAMS" (16,14;"FOR" 2&18,7;"SCIENCE STUDENTS" < 200 F d&6,11 ;1;"PHYSICS" n21,0;" 1983" x 200  |'8,6@;"REVISION QUESTIONS" 10 ,13P;"UNITS"  100H 918,3;6;"PRESS ANY KEY TO CONTINUE." ""420R =""430W L Q=0 V G=0 ` Y=0 j Z=0  &6@,7`;"TYPE IN YOUR NAME" 28,1;"THEN PRESS ENTER TO CONTINUE." A$ A$=""1240 A$>181240 92,7;1;"HELLO ";6;0;A$ =6,1;1;"FIRST TYPE IN YOUR POINT SCORE." 512@,1;"IF THIS IS YOUR FIRST TIME THEN"  14`,12@;"TYPE 0" B$ B$=""1310   "#B$(1)>5791340< ('B$0ưB$100H1370+@ 2 <&"YOU HAVE PUSHED ";B$;", YOU SHOULD" F12,1;"HAVE PUSHED A NUMBER BETWEEN" I4,10 ;"0 AND 100" K;16,1;1;"NOW PRESS YOUR CORRECT GRADE" P118,5;1;"FOLLOWED BY ENTER." U 1310# ZB=B$ d n82,3;1;"YOU WILL NOW BE GIVEN SOME" x84,3;1;"MULTIPLE CHOICE QUESTIONS." ;7,2;4;"TO GAIN POINTS YOU MUST SCORE" 89 ,3;4;"AT LEAST SEVEN OUT OF TEN." B>014404 111 ,7;4;"YOU BEGIN AT ZERO." 515p,0;"WHEN YOU REACH 100 PTS YOU HAVE" 517,1;"COMPLETED THIS REVISION SERIES." 919,3;6;"PRESS ANY KEY TO CONTINUE." ""14707 =""14809  23@,2;"YOU ARE ADVISED NOT TO SPEND" 05 ,2;"TOO LONG AT ANY ONE SESSION" 49,1;"IF YOU DO THEN YOU WILL BE ABLE" 6110,1;"TO ANSWER THE QUESTIONS WITHOUT" 313 ,2;"REALLY KNOWING THE EQUATIONS." 917,3;6;"PRESS ANY KEY TO CONTINUE." ""1560C "=""1570D@ # $*0,10 ;1;"POINT SCORE" %A=120 &45 ,0;"7 OUT OF 10 ......... 6 POINTS" '47`,0;"8 OUT OF 10 .........10 POINTS" (49,0;"9 OUT OF 10 .........16 POINTS" )5110,0;"10 OUT OF 10 .........20 POINTS" *A ,E$(238,35 ) -M$(5 ,35 ) .D$(238,30p) /C$(5 ,35 ) 0 F=1 2 Y1=1 3 Y2=2 4 Y3=3@ 5 Y4=4 6 Y5=5 8 :C=(*5)+1 <C=Y11604H =C=Y21606H >C=Y31608I ?C=Y41610I@ @C=Y51612I B 1594G@ D Y1=0 E 1614I F Y2=0 G 1614I H Y3=0 I 1614I J Y4=0 K 1614I L Y5=0 M 1614I N Z=Z+1 PZ=1W1=C RZ=2W2=C TZ=3@W3=C VZ=4W4=C XZ=5 W5=C YZ<5 1594G@ Z Z=0 \!D$(1)=" PLANE ANGLE =" ^D$(2)=" LENGTH =" hD$(3@)=" AREA =" rD$(4)=" VOLUME =" |D$(5 )=" TIME =" D$(6@)=" VELOCITY =" "D$(7`)=" ACCELERATION =" D$(8)=" FREQUENCY =" D$(9)=" MASS =" D$(10 )=" DENSITY =" D$(110)=" FORCE =" &D$(12 )=" MOMENT OF FORCE =" D$(13P)=" PRESSURE =" D$(14`)=" ENERGY =" D$(15p)=" POWER =" "D$(16)=" TEMPERATURE =" -D$(17)=" SPECIFIC HEAT CAPACITY =" +D$(18)=" SPECIFIC LATENT HEAT =" 'D$(19)=" ELECTRIC CURRENT =" &D$(20)=" ELECTRIC CHARGE =" +D$(21)=" POTENTIAL DIFFERENCE =" !D$(220)=" RESISTANCE =" "D$(238)=" CAPACITANCE =" E$(1)="DEGREE" &E$(2)="METRE" 0E$(3@)="SQUARE METRE" :E$(4)="CUBIC METRE" DE$(5 )="SECOND,HOUR" N E$(6@)="METRE PER SECOND" X(E$(7`)="METRE PER SECOND SQUARED" bE$(8)="HERTZ" lE$(9)="KILOGRAM" v)E$(10 )="KILOGRAM PER CUBIC METRE" E$(110)="NEWTON" E$(12@)="NEWTON METRE" (E$(13P)="NEWTON PER SQUARE METRE" E$(14`)="JOULE" E$(15p)="WATT" E$(16)="DEGREE CELSIUS" *E$(17)="JOULE PER KILOGRAM KELVIN" #E$(18)="JOULE PER KILOGRAM" E$(19)="AMPERE" E$(20 )="COULOMB" E$(21()="VOLT" E$(220)="OHM" E$(238)="FARAD" B100H3100A D=(238*)+1  1;D$(D) M$(1)=E$(D)  f=1 E=(238*)+1 E=D2040  F=F+1  M$(F)=E$(E)  F<5 2040 m$(2)=m$(3)m$(2)=m$(4)m$(2)=m$(5)m$(3)=m$(4)m$(3)=m$(5)m$(4)=m$(5)2037 C$(W1)=M$(1) C$(W2)=M$(2) C$(W3)=M$(3@) C$(W4)=M$(4) C$(W5)=M$(5 ) >$3@,1;"1. ";C$(1) H$6@,1;"2. ";C$(2) R$9,1;"3. ";C$(3@) \%12@,1;"4. ";C$(4) f%15p,1;"5. ";C$(5 ) p:18,1;6;"TYPE IN THE NUMBER THAT YOU" z019,7;6;"THINK IS CORRECT." ""2180@ =""2190 C<"1"Ŧ>"5""YOU MUST PRESS A KEY BETWEEN 1 AND 5" <"1"Ŧ>"5"2160 H= C$(H)=E$(D)2410 A=110  ?3,3;6;2;"N0 YOUR ANSWER IS WRONG." A  Q=Q+1 -7`,1;"THE CORRECT ANSWER IS :-" 110,3@;D$(D) 14`,1;E$(D) 918,3;6;"PRESS ANY KEY TO CONTINUE." ""2330 $=""2340@ ) 3G+Q=10 4000z 8G+Q=10 2500@ ` 1584F j o>6,0;4;"WELL DONE YOUR ANSWER IS CORRECT" tA=15 ~A G=G+1 Q+G=10 4000z Q+G<10 1584F  B100H3100A Y=Y+Q Z=G+Z (0,7;1;"YOUR SCORE" W4,1;7;"RIGHT ANSWERS":4,17;7;"WRONG ANSWERS" 8,6@;G;238;Q (?16,0;6;"WOULD YOU LIKE FURTHER EQUATIONS" 2218,2;"PRESS Y FOR YES OR N FOR NO" <""2620# A=""2625$ P Q=0 U G=0 Z="Y"Ŧ="y"15840 d="N"Ŧ="n"2900T n,1;" YOU MUST PRESS EITHER Y OR N." x 2600" T ^*1;" WOULD YOU LIKE A LIST OF THE" h=2,0;1;"EQUATIONS USED IN THIS PROGRAM?" r08,2;"PRESS Y FOR YES OR N FOR NO" |""29407 =""29508` ="N"Ŧ="n"3100 ="Y"Ŧ="y"3000 <14,1;6;"YOU MUST PRESS EITHER Y OR N." 29407 A=1238  D$(A) 4,4;E$(A) 918,2;6;"PRESS ANY KEY FOR THE NEXT" )20,14;6;"EQUATION." ""3060?@ =""3070? A  &!7`,7`;"GOODBYE ";A$ 0?B100d15,1;"YOU HAVE REACHED 100 POINTS." 5 3110&   502:  G<7` *4,11 ;7;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." (4,11 ;3;"WELL DONE" :6,1;1;"YOU HAVE GAINED SOME POINTS." G=7`X=6@ G=8X=10 G=9X=16 G=10 X=20 >13 ,0;1;"YOUR POINT SCORE IS NOW :- ";B+X B=B+X <21,0;4;" PRESS ANY KEY TO CONTINUE."  0 B<100H4170P ",17,5 ;"YOU HAVE NOW COMPLETED" ,,19,5;"THIS REVISION PROGRAM." JA=150H TA h qgy z AKENB0b @ t *#DEGREE METRE SQUARE METRE CUBIC METRE SECOND,HOUR METRE PER SECOND METRE PER SECOND SQUARED HERTZ KILOGRAM KILOGRAM PER CUBIC METRE NEWTON NEWTON METRE NEWTON PER SQUARE METRE JOULE WATT DEGREE CELSIUS JOULE PER KILOGRAM KELVIN JOULE PER KILOGRAM AMPERE COULOMB VOLT OHM FARAD ʹ#JOULE PER KILOGRAM KELVIN SECOND,HOUR METRE PER SECOND SQUARED DEGREE DEGREE CELSIUS ķ PLANE ANGLE = LENGTH = AREA = VOLUME = TIME = VELOCITY = ACCELERATION = FREQUENCY = MASS = DENSITY = FORCE = MOMENT OF FORCE = PRESSURE = ENERGY = POWER = TEMPERATURE = SPECIFIC HEAT CAPACITY = SPECIFIC LATENT HEAT = ELECTRIC CURRENT = ELECTRIC CHARGE = POTENTIAL DIFFERENCE = RESISTANCE = CAPACITANCE = ô#JOULE PER KILOGRAM KELVIN DEGREE CELSIUS DEGREE SECOND,HOUR METRE PER SECOND SQUARED f cdehx PROBLEMS 1E1Z0G1Z5:5:1: d&5,11 ;1;"SCISOFT" n F=0 x G=0  *14`,5 ;"EDUCATIONAL PROGRAMS" 16,14`;"FOR" &18,7`;"SCIENCE STUDENTS"  200 ; @I=110 T&6,11 ;1;"PHYSICS" ^*10 ,10 ;6;"PROBLEMS 1" m21,0;" 1983" r 200 |  A=0 B=115p A,0;"" *7;" " *6;" " +2;" " +3;" " A=0100H  A=A+1  .2~L,B B 3,-8  200  37`,1;"PLEASE TYPE IN YOUR NAME, THEN" ,,8;"PRESS ENTER." C$ C$=""1030  C$>181030  :2,8;1;"HELLO ";6;0;C$ $$,,,," YOU WILL NOW BE GIVEN SOME" .",," PHYSICS PROBLEMS TO SOLVE." B(,,,,,,"AFTER YOU HAVE GIVEN 5 ANSWERS" L$,," YOU WILL BE GIVEN A PROGRESS" V,,12 ;"REPORT." `921,2;4;"PRESS ANY KEY TO CONTINUE." j""1130 @ t=""1140  -6;"PLEASE NOTE THAT IN THIS PROGRAM" /,,6;"THE FOLLOWING ABBREVIATIONS HAVE" ,,,4,11 ;6;"BEEN USED:-"  19 ,0;" DEGREES CELSIUS....DEG. C" H921,2;4;"PRESS ANY KEY TO CONTINUE." R""2130 \=""2140  PROB=((*5 )+1) (PROB*1000z)+2505 RDM R, I AND MU I$=((*30p)+30p) R$=((*10 )+5 ) R$=((I$)-(R$)) 5O$=((((I$))*/1804)/(((R$))*/1804)) O$=O$(15 ) N$=(1/(O$)) N$=N$(15 ) M=((*2)+1) R=(R$) I=(I$) O=(O$) N=(N$) C=(*3@)+1 C=1I$="XX" C=2R$="XX" C=3@N$="XX"  C=3@O$="XX" M=1F$="1" M=2F$="2" tCALCS. ~C=1D=I C=2D=R C=3@M=1D=N C=3@M=2D=O  6@,15p;"," ,10 ;2;0;"SNELL S LAW"  250z  '40(,140:180,0 '100d,140:0,35# )100d,140:-30,35# (100d,140:30,35# (100d,140:0,-35# )100d,140:13 ,-35#  1 &0,0;2;"Incident" (0,17;2;"Reflected" !1,0;2;"ray" "1,17;2;"ray" '3,23;7;"MEDIUM 1" '5,23;0;"MEDIUM 2"  2,11 ;0;"i" G8,5;"Normal":8,15;2;"Reflected ray"  0 8,13 ;"r" &,,,,"ANGLE OF INCIDENCE i = ";I$ $,,"ANGLE OF REFRACTION r = ";R$ 4M=1,,"REFRACTIVE INDEX-MEDIUM ";F$;"= ";N$ "4M=2,,"REFRACTIVE INDEX-MEDIUM ";F$;"= ";O$ ,6f$="1"16,0;"(In respect to medium 2)" -6f$="2"16,0;"(In respect to medium 1)" h]19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES," m021,7;1;"THEN PRESS ENTER." rJ$ sJ$=""4210r tJ$>5794210r u ANS=J$ w  9015  VARIABLES P=(*80 )+7204 %A=((*10 )+20 )*10 %M=((*10 )+20 )*10 E=(*98D)+1 B=(*98D)+1 H=(*3@)+1 +H=1T$="TURNED VERTICAL (UPRIGHT)" ,H=2T$="TURNED VERTICAL (INVERTED)" !H=3@T$="KEPT HORIZONTAL" CALCS. H=1P2=P+M  H=2P2=P-M H=3@P2=P \*D=(P*A*(B+273))/((E+273)*P2)  17,11 ;2;0;"GAS LAWS"  250z  " AIR SPACE MERCURY" 28`;"FINE" [0;"";7;"";5;"":2,27;" TUBE" (0;"" " <----A----><----M---->" $,,,,"ATMOS. PRESSURE = ";P;"mmHg." "AIR SPACE = ";A;"mm" "MERCURY = ";M;"mm" ""TEMPERATURE = ";E;" DEG. C"  F,,,,"WHAT WOULD BE THE LENGTH OF THE AIR COLUMN IF THE TEMPERATURE " '"IS ALTERED TO ";B;" DEGREES CELSIUS" "AND THE TUBE IS ";T$;"?" P]19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES," U021,7;1;"THEN PRESS ENTER." ZJ$ [J$=""5210Z \J$>5795210Z ] ANS=J$  9015  VARIABLES *L$=(((*30p)+1)/10E5t$) T$=((*10 )+15p) F$=((*2)+97B) ,R$=(((*400H)+100H)/100H) *M$=(((*904)+10 )/100H) M$=((R$)+(M$)) )B$=(((*20 )+1)/100H) B$=((B$)+0.9ffff) C=(*5 )+1 C=1L$="XX" C=2T$="XX" C=3@F$="XX" C=4R$=" XX " C=5 M$=" XX " CALCS. =C=1D=((M$)-(R$))/(((F$)-(T$))*(B$)*1000z) =C=2D=(F$)-(((M$)-(R$))/((L$)*(B$)*1000z)) =C=3@D=(T$)+(((M$)-(R$))/((L$)*(B$)*1000z)) =C=4D=(M$)-(((F$)-(T$))*((L$)*(B$)*1000z)) =C=5 D=(R$)+(((F$)-(T$))*((L$)*(B$)*1000z)) D$C=2D-2735505,  87,7;2;0;"LINEAR EXPANSION"  250z o p$"METAL BAR WITHIN A HEATED JACKET" z,," - ----------" &" BAR ";6;"" Q" ";0;"";1;"";6;"";1;" MICRO-" !" ---------- - METER" " " " " $2;" " #,,"LINEAR EXPANSIVITY = ";L$;"/K" ,," READINGS INITIAL FINAL" -,,"TEMPERATURE = ";T$;" ";F$;" DEG. C" ""MICROMETER = ";M$;" ";R$;"mm"  "BAR LENGTH = ";B$;" - m" 8C=1D$="SEVEN" BC>1D$="TWO" `19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO ";D$;" DECIMAL PLACES," 021,7;1;"THEN PRESS ENTER." J$ J$=""6400 J$>5796400  ANS=J$  C>19015 3DANS+(5E-8hV)9050 h  9032 iRDM R,I AND V nR$=((*5 )+1) xS$=((*10 )+1) T$=((*10 )+1) A$=((*10 )+1) V$=((*10 )+110) )((V$)/(A$))-(R$)=06510Kp C=(*5 )+1 C>16570MP C=1R$="XX" C=2S$="XX" C=3@T$="XX" C=4A$="XX" C=5 V$="XX" BC=5 D=(1/(1/(S$)+1/(T$))+(R$))*(A$) LC=4D=1/((1/(1/(S$)+1/(T$))+(R$))/(V$)) DC=1D=((V$)/(A$))-(1/(1/(S$)+1/(T$))) FC=2D=1/((1/(((V$)/(A$))-(R$)))-1/(T$)) FC=3@D=1/((1/(((V$)/(A$))-(R$)))-1/(S$)) D<04510  7`,14`;"," 28,11 ;2;0;"OHM S LAW"  250z W X15p;"R2" ]10 ;"" b35;"R1";10 ;" ";22;"" l"" (A)" v." ";15p;"R3";220;" " #" ";10 ;" " '" ";14`;"";24@;"" " ";24@;"" " ";24@;"" " ";24@;"" " (V)" ),,"RESISTOR R1 =";R$;" OHMS" '"RESISTOR R2 =";S$;" OHMS" '"RESISTOR R3 =";T$;" OHMS" '"CURRENT A =";A$;" AMPS" ("POTENTIAL DIFFERENCE V =";V$;" VOLTS" ]19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES," 021,7;1;"THEN PRESS ENTER." *J$ +J$=""7210* ,J$>5797210* - ANS=J$ / R 9015 QRDM DIT AND LOAD V'D$=(((*5 )+1)/10 ) `'E$=(((*5 )+1)/10 ) e'F$=(((*5 )+1)/10 ) jL$=((*5 )+4) oM$=((*9)+110) tN$=((*5 )+4) C=(*6@)+1 C=1D$="X" C=2E$="X" C=3@F$="X" C=4L$="X" C=5 M$="X" C=6@N$="X" CALCS. 2C=1D=(((E$)*(M$))-((F$)*(N$)))/(L$) 2C=2D=(((L$)*(D$))+((N$)*(F$)))/(M$) 2C=3@D=(((E$)*(M$))-((D$)*(L$)))/(N$) 2C=4D=(((E$)*(M$))-((F$)*(N$)))/(D$) 2C=5 D=(((L$)*(D$))+((N$)*(F$)))/(E$) 2C=6@D=(((E$)*(M$))-((D$)*(L$)))/(F$) x /7,12 ;2;0;"MOMENTS"  250z 6D=07510j ? @;" ";1;"O";0;"<---PULLEY NB THIS DIAGRAM" J%1,16;"IS NOT TO SCALE" N&15,120x:0,502 P'25,167:0,-25 ^"4,2;0;"L1" r6,3;"<---D1-->" |#6;"" " <--D2-->^<--D3-->" '17,111o:0,-25 (161,111o:0,-25 '90Z,103g:0,-17 '91[,103g:0,-17 '92\,103g:0,-17 611 ,0;0;" L2 FULCRUM L3" <14,0;"LOAD L1= ";L$;"N DISTANCE D1= ";D$;"m" )"LOAD L2= ";M$;"N DISTANCE D2= ";E$;"m" *"LOAD L3= ";N$;"N DISTANCE D3= ";F$;"m" ]19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES," 021,7;1;"THEN PRESS ENTER." J$ J$=""8210 J$>5798210  ANS=J$  9015 #7 #<ANS RIGHT OR WRONG #F-DANS+.05|L9050 h #H #K F=F+1 #LI=17 #M84,10 ;2;"YOU ARE RIGHT":.1}L,I #N54,10 ;2;1;"YOU ARE RIGHT" #OI #P.2~L,I+1:20 #QI #R 5 #S 40( #TF+G=5 9200 #U 9240` #Z #[I=110 #\A4,10 ;7;"YOU ARE WRONG":.2~L,I-20 #]54,10 ;0;7;"YOU ARE WRONG" #^I #_40(:G=G+1 #`Y$=D #a #b-D>0.0001sQXƱY$>6@Y$=Y$(6@) #cb5,0;1;" WOULD YOU LIKE TO KNOW THE ",,," CORRECT ANSWER. " #d110 ,2;"PRESS Y FOR YES OR N FOR NO" #e""9061 #f=""9062 #g="N"Ŧ="n"9074r# #h"Y"Ʀ"y"9061e# #i #j02,0;"THE CORRECT ANSWER IS : ";Y$ #ka5,0;1;"DO NOT FORGET THE APPROPRIATE ",,," UNITS IN THE EXAMINATION. " #l PROB=2D=(P*A*B)/(E*P2) #mPROB29074 #n-DANS+.05|L9074 #p/,,,,"TUT TUT YOU FORGOT TO CONVERT TO KELVIN" #r 250z #sF+G=5 9200 #tT,,,,6;"WOULD YOU LIKE TO HAVE ANOTHER",,," GO AT THE PROBLEM? " #v!,," PRESS Y FOR YES N FOR NO" #x""9080 #=""9090 #="Y"Ŧ="y"D=0 #+="Y"Ŧ="y"(PROB*1000)+26102 #="N"Ŧ="n"9240$ #"N"Ʀ"n"9080x# # #'7;1;"YOUR SCORE SO FAR" $M4,1;6;"RIGHT ANSWERS";4,17;"WRONG ANSWERS" $ 8,6@;F;238;G $ F=0 $ G=0 $ 400H $ $?16,0;1;" WOULD YOU LIKE MORE QUESTIONS? " $"118,2;"PRESS Y FOR YES OR N FOR NO" $,""9260 $6=""9270 $@="N"Ŧ="n"9310^$ $J="Y"Ŧ="y"3010 $O"Y"Ʀ"y"9260,$ $T$,," YOU MUST PRESS EITHER Y OR N" $W 9260 $^ $h*7,7;1;"GOODBYE ";C$ fg @appCKENro@L.00003T17F97R1.05B1.02c M XX d_;cDTWOHPROBLEMS 2;Z:;Z5:5:1: d&5,11 ;1;"SCISOFT" n F=0 x G=0  *14`,5 ;"EDUCATIONAL PROGRAMS" 16,14`;"FOR" &18,7`;"SCIENCE STUDENTS"  200 ; T&6,11 ;1;"PHYSICS" ^)9 ,10 ;6;"PROBLEMS 2" m21,0;" 1983" r 200 |  A=0 B=115p A,0;"" *7;" " *6;" " +2;" " +3;" " A=0100d  A=A+1  .2~L,b B 3,-8  200  37`,1;"PLEASE TYPE IN YOUR NAME, THEN" ,,8;"PRESS ENTER." C$ C$=""1030  C$>181030  :2,8;1;"HELLO ";6;0;C$ $$,,,," YOU WILL NOW BE GIVEN SOME" .",," PHYSICS PROBLEMS TO SOLVE." B(,,,,,,"AFTER YOU HAVE GIVEN 5 ANSWERS" L$,," YOU WILL BE GIVEN A PROGRESS" V,,12 ;"REPORT." `921,2;4;"PRESS ANY KEY TO CONTINUE." j""1130 @ t=""1140  -6;"PLEASE NOTE THAT IN THIS PROGRAM" /,,6;" THE FOLLOWING ABBREVIATION HAS " $,,11 ;6;"BEEN USED:-"  19 ,0;" DEGREES CELSIUS....DEG. C" H921,2;4;"PRESS ANY KEY TO CONTINUE." R""2130 \=""2140  PROB=((*5 )+1) (PROB*1000z)+2505 VARIABLES R$=((*9)+1) S$=((*9)+1) (T$=(((*19)+2)/10 ) (I$=(((*50H)+1)/10 ) E$=((*12@)+1) C=(*5 )+1 C=1R$="XX" C=2S$="XX" C=3@T$="XX" C=4I$="XX" C=5 E$="XX" CALCS. HC=1D=1/(1/(((E$)/(I$))-((T$)))-(1/(S$))) $HC=2D=1/(1/(((E$)/(I$))-((T$)))-(1/(R$))) .DC=3@D=((E$)/(I$))-(1/(1/(R$)+1/(S$))) 8DC=4D=(E$)/((1/(1/(R$)+1/(S$)))+(T$)) BFC=5 D=((1/(1/(R$)+1/(S$))+(T$)))*((I$)) tD03505[  E7,0;2;0;"E.M.F. AND INTERNAL RESISTANCE" -12 ,8;6;"PROBLEM TYPE 3"  250z  10 ;"" " (A)" " ";25H;"" " ";25H;"" " ";25H;"" %" R1";25H;"" '" ";25H;"" " " 9;" R2 " 9;"" ),,"INTERNAL RESISTANCE =";T$;" OHMS"  ),,"RESISTOR R1 =";R$;" OHMS" '"RESISTOR R2 =";S$;" OHMS" "),,"CURRENT A =";I$;" AMPS" 1("E.M.F. =";E$;" VOLTS" 6_19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES, " @021,7;1;"THEN PRESS ENTER." rJ$ sJ$=""4210r tJ$>5794210r u ANS=J$ w  9015  VARIABLES (T$=(((*19)+2)/10 ) (I$=(((*50H)+1)/10 ) E$=((*12@)+1) V=E$-((*5 )+1) V$=V C=(*4)+1 C=1T$="XX" C=2I$="XX" C=3@E$="XX" C=4V$="XX" CALCS. "C=1D=((E$)-(V$))/(I$)  "C=2D=((E$)-(V$))/(T$) *"C=3@D=((I$)*(T$))+(V$) 4"C=4D=(E$)-((I$)*(T$)) \D04505  E7,0;2;0;"E.M.F. AND INTERNAL RESISTANCE" -12 ,8;6;"PROBLEM TYPE 1"  250z  10 ;"" " (A)" " ";25H;"" " ";25H;"" " RESISTOR " " " " " 8;"";220;"" 8;"";220;"" 8;"(V)" +,,,,"INTERNAL RESISTANCE =";T$;" OHMS" ("POTENTIAL DIFFERENCE V =";V$;" VOLTS" '"CURRENT A =";I$;" AMPS" ("E.M.F. =";E$;" VOLTS" `19,0; 6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES, " (021,7;1;"THEN PRESS ENTER." ZJ$ [J$=""5210Z \J$>5795210Z ] ANS=J$ _  9015  VARIABLES R$=((*9)+1) S$=((*9)+1) (T$=(((*19)+2)/10 ) (I$=(((*50H)+1)/10 ) E$=((*12@)+1) C=(*5 )+1 C=1R$="XX" C=2S$="XX" C=3@T$="XX" C=4I$="XX" C=5 E$="XX" CALCS. (C=1D=((E$)/(I$))-(T$)-(S$) (C=2D=((E$)/(I$))-(T$)-(R$) (C=3@D=((E$)/(I$))-(S$)-(R$) (C=4D=(E$)/((R$)+(S$)+(T$)) (C=5 D=(I$)*((T$)+(R$)+(S$)) DD05505,  E7,0;2;0;"E.M.F. AND INTERNAL RESISTANCE" -12 ,8;6;"PROBLEM TYPE 2"  250z o p10 ;"" u" (A)" z" ";25H;"" " ";25H;"" " R1 R2 " " " " " +,,,,"INTERNAL RESISTANCE =";T$;" OHMS" ),,"RESISTOR R1 =";R$;" OHMS" '"RESISTOR R2 =";S$;" OHMS" ),,"CURRENT A =";I$;" AMPS" ("E.M.F. =";E$;" VOLTS" _19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES, " 021,7;1;"THEN PRESS ENTER." BJ$ CJ$=""6210B DJ$>5796210B E ANS=J$ G j 9015 iRDM G AND DEG. n)M$=(((*40 )+10 )*10 ) s)N$=(((*20 )+10 )*10 ) }T$=((*40 )+20 ) U$=((*40 )+20 ) V$=((*40 )+20 ) O$=((*100H)+50H) C=(*6@)+1 C=1M$="XX" C=2N$="XX" C=3@O$="XX" C=4T$="XX" C=5 U$="XX" C=6@V$="XX" CALC. jC=1D=(((N$)*4.2fff*((U$)-(V$)))-((O$)*0.4L*((V$)-(T$))))/(((V$)-(T$))*4.2fff) jC=2D=(((O$)*0.4L*((V$)-(T$)))+((M$)*4.2fff*((V$)-(T$))))/(4.2fff*((U$)-(V$))) jC=3@D=(((N$)*4.2fff*((U$)-(V$)))-((M$)*4.2fff*((V$)-(T$))))/(((V$)-(T$))*0.4L) C=4D=((0.4L*(O$)*(V$))+(4.2fff*(M$)*(V$))+(4.2fff*(N$)*(V$))-(4.2fff*(N$)*(U$)))/((0.4L*(O$))+(4.2fff*(M$))) xC=5 D=(((O$)*0.4L*((V$)-(T$)))+((M$)*4.2fff*((V$)-(T$)))+(N$)*4.2fff*(V$))/((N$)*4.2fff) C=6@D=((4.2fff*(N$)*(U$))+(0.4L*(O$)*(T$))+(4.2fff*(M$)*(T$)))/((0.4L*(O$))+(4.2fff*(M$))+(4.2fff*(N$))) ,D<06505KH  =7,5;2;0;"SPECIFIC HEAT CAPACITY"  250z W X ,,,,,"" Y J=0 ]6;" " ^ 0 b" X X" g" X X" l/" X X";1;" A LAGGED COPPER" q" X X" v+" XX";1;" CALORIMETER" {" XX" 0" XX";1;" CONTAINING WATER" " XX" " XXXXXXX" " "  1 J=17260\  50H  N=6@ M=16@ %3,N;6;" "  N=N-1 M  50H %0,16;"*** BEAKER OF" %1,12@;"******* WATER" 2,12@;""  100H  N=1  W=0  Y=18 M=113P M97145_H N,110;"*"  W,Y;" "  Y=Y-1  N=N+1 M=3@Y=18 M=3@W=1 M 8,9;""  W=2 M=15 W,110;" "  W=W+1  M %7`,9;"" * 50H /M=13@ 9M > N=0 CM=12 HN,M;6;" " MM R J=J+1 SI=010 T!I,15;" " UI W11 ,6;" " X12 ,6;" " Z0,0;"" [ 7006^ \!4,9 ;1;" " ]!5,9 ;1;" " ^!6,9 ;1;" " _!7,9 ;1;" " a'11 ,16;"MASS TEMPERATURE" f#12 ,18;"g DEG. C" p0,,"WATER INITIALLY ";M$;14`,26P;T$ z."WATER ADDED ";N$;15p,26P;U$ -"WATER FINALLY -";16,26P;V$ 0"CALORIMETER ";O$;17,26P;"-" &0,15;" SPECIFIC HEAT" &1,15;" CAPACITIES IN" '2,15;" JOULES PER GRAM" %3@,16;" KELVIN " &5 ,15p;" WATER = 4.2" '7`,15p;" COPPER = 0.4 " _19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES, "  021,7;1;"THEN PRESS ENTER." J$ J$=""7440 J$>5797440  ANS=J$   9015 QRDM G AND DEG. VM$=((*20 )+10 ) [)N$=(((*30p)+20 )*10 ) eT$=((*10 )-10 ) jU$=((*30p)+50H) tV$=((*19)+30p) C=(*5 )+1 C=1M$="XX" C=2N$="XX" C=3@T$="XX" C=4U$="XX" C=5 V$="XX" CALCS. C=1D=((((N$)*4.2fff*((U$)))-((N$)*4.2fff*(V$))))/((2.1fff*(T$)*-1)+(318)+(4.2fff*(V$))) āC=2D=(((M$)*318)+((M$)*2.1fff*(T$)*-1)+((M$)*4.2fff*(V$)))/((4.2fff*(U$))-(4.2fff*(V$))) wC=3@D=((((N$)*4.2fff*((U$)-(V$)))-((M$)*318)-((M$)*4.2fff*(V$)))/((M$)*2.1fff))*-1 ؅C=4D=(((M$)*318)+((M$)*2.1fff*(T$)*-1)+((M$)*4.2fff*(V$))+((N$)*4.2fff*(V$)))/(4.2fff*(N$)) C=5 D=(((N$)*4.2fff*(U$))-((M$)*318)-((M$)*2.1fff*(T$)*-1))/(((N$)*4.2fff)+((M$)*4.2fff)) $C=3@D<-100H7505j !C3@D<07505j x 37,12 ;2;0;"LATENT HEAT"  250z ? @ ,,,,,"" A J=0 E6;" " F 0 J" X X" O" X X" Q" X X" T-" X X";1;" A POLYSTYRENE" Y" X X" ^+" XX";1;" CALORIMETER" c" XX" h0" XX";1;" CONTAINING WATER" m" XX" r" XXXXXXXX" w" " x 1 yJ=18260D | 50H  N=6@ M=16@ %3,N;6;" "  N=N-1 M 3@,9;" "  50H  N=13P  W=0 M=14 *W,N;" ";0,17;"DRIED ICE" W+1,N;" "  N=N-1 2,110;"" M 0,110;" " 1,110;" " M=110 )W,N;"";0,17;"DRIED ICE" W+1,N;"" W-1,N;" "  W=W+1 M  50H 10 ,9;""  50H 9,8;""  N=3@ M=12 N,M;6;" " M : J=J+1 ? C 8005E D'12@,16;"MASS TEMPERATURE" I"5,8;1;" " J"6,8;1;" " K"7,8;1;" " N#13 ,18;"g DEG. C" X1,,"ICE INITIALLY ";M$;15p,26P;T$ b."WATER INITIALLY ";N$;16,26P;U$ l-"WATER FINALLY -";17,26P;V$ {#0,15;" S.H.C." }%1,17;"JOULES PER GRAM" ~2,20 ;"KELVIN" &4,15p;" WATER = 4.2" '5 ,15p;" ICE = 2.1 " %6@,15p;" " "7,16;" S.L.H." &8,16;" JOULES PER GRAM" '9,15p;" " %10 ,15p;" ICE = 318 " _19,0;6;"KEY IN THE VALUE OF THE UNKNOWN CORRECT TO TWO DECIMAL PLACES, " 021,7;1;"THEN PRESS ENTER." J$ J$=""8440 J$>5798210 ANS=J$  ! 9015 #7 #<ANS RIGHT OR WRONG #F-DANS+.05|L9050 h #H #K F=F+1 #LI=17 #M84,10 ;2;"YOU ARE RIGHT":.1}L,I #N54,10 ;2;1;"YOU ARE RIGHT" #OI #P.2~L,I+1:20 #QI #R 5 #S 40( #TF+G=5 9200 #U 9240` #Z #[I=110 #\A4,10 ;7;"YOU ARE WRONG":.2~L,I-20 #]54,10 ;0;7;"YOU ARE WRONG" #^I #_40(:G=G+1 #`Y$=D #a #b-D>0.0001sQXƱY$>6@Y$=Y$(6@) #cb5,0;1;" WOULD YOU LIKE TO KNOW THE ",,," CORRECT ANSWER. " #d110 ,2;"PRESS Y FOR YES OR N FOR NO" #e""9061 #f=""9062 #g="N"Ŧ="n"9074r# #h"Y"Ʀ"y"9061e# #i #j02,0;"THE CORRECT ANSWER IS : ";Y$ #ka5,0;1;"DO NOT FORGET THE APPROPRIATE ",,," UNITS IN THE EXAMINATION. " #n 250z #rF+G=5 9200 #tT,,,,6;"WOULD YOU LIKE TO HAVE ANOTHER",,," GO AT THE PROBLEM? " #v!,," PRESS Y FOR YES N FOR NO" #x""9080 #=""9090 #="Y"Ŧ="y"D=0 #+="Y"Ŧ="y"(PROB*1000)+26102 #="N"Ŧ="n"9240$ #"N"Ʀ"n"9080x# # #'7;1;"YOUR SCORE SO FAR" $M4,1;6;"RIGHT ANSWERS";4,17;"WRONG ANSWERS" $ 8,6@;F;238;G $ F=0 $ G=0 $ 400H $ $?16,0;1;" WOULD YOU LIKE MORE QUESTIONS? " $"118,2;"PRESS Y FOR YES OR N FOR NO" $,""9260 $6=""9270 $@="N"Ŧ="n"9310^$ $J="Y"Ŧ="y"3010 $O"Y"Ʀ"y"9260,$ $T%,," YOU MUST PRESS EITHER Y OR N." $W 9260 $^ $h*7,7;1;"GOODBYE ";C$ $r 9320h$ fgapprocd;Mjn@Cw`n;7KL#vCGyR6S2I3.2EXXM280N270U58V34O114TXXY11.721J11.721QEQMECH - -/ )0::"":0,0;"":"" EQ @m6lmm6mmm6lmm6mmm mammammm mammammm6lmm6mmm6lmm6mm` ma lal` ma lalmm`6mmmmmm`6mmmm` ma lal` ma lalm amlaml` ma lalmmammlm amlamlm `mlalmmamml` alalm `mlal` ma lal` alalm amlaml` ma lalm6l`mmlm amlaml ` lalm6l`mml` alaml ` lalm mamlal` alamlm `mlamlm mamlalm6l`lmlm `mlaml` ma lalm6l`lml|B<><<~B<BBD@B@@BBBBb@@BBDbBB~(<@<|BBBBR<@BBBR@|B@@RB~BJ@B~BJN@BBBB@JBBBFB@BBDFB@B<><<~<B<8888888888888888888888888888888888888888888888888888888888888888PROG1 . #!. 5:5:1: &5,11 ;1;"SCISOFT" *14,5;"EDUCATIONAL PROGRAMS" (16,14;"FOR" 2&18,7;"SCIENCE STUDENTS" < 200 F d&6,11 ;1;"PHYSICS" n21,0;" 1983" x 200  |'8,6@;"REVISION QUESTIONS"  10 ,11 ;"MECHANICS"  100H 918,3;6;"PRESS ANY KEY TO CONTINUE." ""420R =""430W L Q=0 V G=0 ` Y=0 j Z=0  &6@,7`;"TYPE IN YOUR NAME" 28,1;"THEN PRESS ENTER TO CONTINUE." A$ A$=""1240 A$>181240 92,7;1;"HELLO ";6;0;A$ =6,1;1;"FIRST TYPE IN YOUR POINT SCORE." 512@,1;"IF THIS IS YOUR FIRST TIME THEN"  14`,12@;"TYPE 0" B$ b$=""1310:  #B$(1)>57913302 ('B$0ưB$100H1370+@ 2 <&"YOU HAVE PUSHED ";B$;", YOU SHOULD" F12,1;"HAVE PUSHED A NUMBER BETWEEN" I4,10 ;"0 AND 100" K;16,1;1;"NOW PRESS YOUR CORRECT GRADE" P118,5;1;"FOLLOWED BY ENTER." U 1310# ZB=B$ d n82,3;1;"YOU WILL NOW BE GIVEN SOME" x84,3;1;"MULTIPLE CHOICE QUESTIONS." ;7,2;4;"TO GAIN POINTS YOU MUST SCORE" 89 ,3;4;"AT LEAST SEVEN OUT OF TEN." B>014404 111 ,7;4;"YOU BEGIN AT ZERO." 515p,0;"WHEN YOU REACH 100 PTS YOU HAVE" 517,1;"COMPLETED THIS REVISION SERIES." 919,3;6;"PRESS ANY KEY TO CONTINUE." ""14707 =""14809  23@,2;"YOU ARE ADVISED NOT TO SPEND" 05 ,2;"TOO LONG AT ANY ONE SESSION" 49,1;"IF YOU DO THEN YOU WILL BE ABLE" 6110,1;"TO ANSWER THE QUESTIONS WITHOUT" 313 ,2;"REALLY KNOWING THE EQUATIONS." 917,3;6;"PRESS ANY KEY TO CONTINUE." ""1560C "=""1570D@ # $*0,10 ;1;"POINT SCORE" %A=120 &45 ,0;"7 OUT OF 10 ......... 6 POINTS" '47`,0;"8 OUT OF 10 .........10 POINTS" (49,0;"9 OUT OF 10 .........16 POINTS" )5110,0;"10 OUT OF 10 .........20 POINTS" *A ,E$(20,35#) -M$(5 ,35 ) .D$(20,80P) /C$(5 ,35 ) 0 F=1 2 Y1=1 3 Y2=2 4 Y3=3@ 5 Y4=4 6 Y5=5 8 :C=(*5)+1 <C=Y11604H =C=Y21606H >C=Y31608I ?C=Y41610I@ @C=Y51612I B 1594G@ D Y1=0 E 1614I F Y2=0 G 1614I H Y3=0 I 1614I J Y4=0 K 1614I L Y5=0 M 1614I N Z=Z+1 PZ=1W1=C RZ=2W2=C TZ=3@W3=C VZ=4W4=C XZ=5 W5=C YZ<5 1594G@ Z Z=0 \,D$(1)="AVERAGE SPEED x TIME TAKEN =" ^-D$(2)="DISTANCE MOVED / TIME TAKEN =" hMD$(3)="INITIAL VELOCITY + (ACCELERATION x TIME TAKEN) =" r\D$(4)="DISTANCE MOVED IN A PARTICULAR DIRECTION / TIME TAKEN =" |7D$(5)="CHANGE IN VELOCITY / TIME TAKEN =" 7D$(6)="WORK OUTPUT x 100 / WORK INPUT =" =D$(7)="AREA OF RAM PISTON / AREA OF PUMP PISTON =" GD$(8)="CHANGE IN MOMENTUM / TIME TAKEN FOR THIS CHANGE =" DD$(9 )="FORCE x DISTANCE MOVED IN DIRECTION OF FORCE =" 8D$(10 )="ENERGY TRANSFERRED / TIME TAKEN ="  D$(11 )="LOAD / EFFORT =" ID$(12 )="DISTANCE MOVED BY EFFORT / DISTANCE MOVED BY LOAD =" &D$(13 )="MASS x ACCELERATION =" XD$(14)="LOAD x DISTANCE LOAD MOVES / EFFORT x DISTANCE EFFORT MOVES =" "D$(15)="MASS x VELOCITY =" AD$(16)="MECHANICAL ADVANTAGE x 100 / VELOCITY RATIO =" `D$(17)="NUMBER OF TEETH IN DRIVEN WHEEL / NUMBER OF TEETH IN DRIVING WHEEL =" "D$(18)="PRESSURE x AREA =" D$(19)="FORCE / AREA ="  D$(20)="MASS / VOLUME =" E$(1)=" DISTANCE" &!E$(2)=" AVERAGE SPEED" 0"E$(3)=" FINAL VELOCITY" :E$(4)=" VELOCITY" D E$(5)=" ACCELERATION" N)E$(6)=" EFFICIENCY PERCENTAGE" X"E$(7)=" VELOCITY RATIO" bE$(8)=" FORCE" lE$(9 )=" WORK DONE" v"E$(10 )=" AVERAGE POWER" )E$(11 )=" MECHANICAL ADVANTAGE" #E$(12 )=" VELOCITY RATIO" E$(13 )=" FORCE" E$(14)=" EFFICIENCY" E$(15)=" MOMENTUM" E$(16)=" EFFICIENCY" #E$(17)=" VELOCITY RATIO" E$(18)=" THRUST" E$(19)=" PRESSURE" E$(20)=" DENSITY" B100H3100A D=(20*)+1  !0,0;0;D$(D) G3,0;5;2;"" M$(1)=E$(D)  f=1 E=(20*)+1 E=D2040  F=F+1  M$(F)=E$(E)  F<5 2040 m$(1)=m$(2)m$(1)=m$(3)m$(1)=m$(4)m$(1)=m$(5)m$(2)=m$(3)m$(2)=m$(4)m$(2)=m$(5)m$(3)=m$(4)m$(3)=m$(5)m$(4)=m$(5)2037 C$(W1)=M$(1) C$(W2)=M$(2) C$(W3)=M$(3@) C$(W4)=M$(4) C$(W5)=M$(5 ) >$4,1;"1. ";C$(1) H$7,1;"2. ";C$(2) R%10 ,1;"3. ";C$(3) \%13 ,1;"4. ";C$(4) f%16,1;"5. ";C$(5) pC18,1;6;0;"TYPE IN THE NUMBER THAT YOU" z919,7;6;0;"THINK IS CORRECT." ""2180@ =""2190 C<"1"Ŧ>"5""YOU MUST PRESS A KEY BETWEEN 1 AND 5" <"1"Ŧ>"5"2160 H= C$(H)=E$(D)2410 A=110  ?3,3;6;2;"N0 YOUR ANSWER IS WRONG." A  Q=Q+1 -7`,1;"THE CORRECT ANSWER IS :-" 110,3@;D$(D) 14`,1;E$(D) 918,3;6;"PRESS ANY KEY TO CONTINUE." ""2330 $=""2340@ ) 3G+Q=10 4000z 8G+Q=10 2500@ ` 1584F j o>6,0;4;"WELL DONE YOUR ANSWER IS CORRECT" tA=15 ~A G=G+1 Q+G=10 4000z Q+G<10 1584F  B100H3100A Y=Y+Q Z=G+Z (0,7;1;"YOUR SCORE" W4,1;7;"RIGHT ANSWERS":4,17;7;"WRONG ANSWERS" 8,6@;G;238;Q (?16,0;6;"WOULD YOU LIKE FURTHER EQUATIONS" 2218,2;"PRESS Y FOR YES OR N FOR NO" <""2620# A=""2625$ P Q=0 U G=0 Z="Y"Ŧ="y"15840 d="N"Ŧ="n"2900T n,1;" YOU MUST PRESS EITHER Y OR N." x 2600" T ^*1;" WOULD YOU LIKE A LIST OF THE" h=2,0;1;"EQUATIONS USED IN THIS PROGRAM?" r08,2;"PRESS Y FOR YES OR N FOR NO" |""29407 =""29508` ="N"Ŧ="n"3100 ="Y"Ŧ="y"3000 <14,1;6;"YOU MUST PRESS EITHER Y OR N." 29407 A=120  D$(A) 4,4;E$(A) 918,2;6;"PRESS ANY KEY FOR THE NEXT" )20,14;6;"EQUATION." ""3060?@ =""3070? A  &!7`,7`;"GOODBYE ";A$ 0?B100d15,1;"YOU HAVE REACHED 100 POINTS." 3110&   G<7` A=110 *4,11 ;7;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." (4,11 ;3;"WELL DONE" :6,1;1;"YOU HAVE GAINED SOME POINTS." A 4,11 ;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." G=7`X=6@ G=8X=10 G=9X=16 G=10 X=20 >13 ,0;1;"YOUR POINT SCORE IS NOW :- ";B+X B=B+X B<100H4170P ",17,5 ;"YOU HAVE NOW COMPLETED" ,,19,5;"THIS REVISION PROGRAM." JA=1200 TA h qgyzAKENB0b  # DISTANCE AVERAGE SPEED FINAL VELOCITY VELOCITY ACCELERATION EFFICIENCY PERCENTAGE VELOCITY RATIO FORCE WORK DONE AVERAGE POWER MECHANICAL ADVANTAGE VELOCITY RATIO FORCE EFFICIENCY MOMENTUM EFFICIENCY VELOCITY RATIO THRUST PRESSURE DENSITY ʹ# FORCE AVERAGE POWER MOMENTUM MECHANICAL ADVANTAGE FINAL VELOCITY EPAVERAGE SPEED x TIME TAKEN = DISTANCE MOVED / TIME TAKEN = INITIAL VELOCITY + (ACCELERATION x TIME TAKEN) = DISTANCE MOVED IN A PARTICULAR DIRECTION / TIME TAKEN = CHANGE IN VELOCITY / TIME TAKEN = WORK OUTPUT x 100 / WORK INPUT = AREA OF RAM PISTON / AREA OF PUMP PISTON = CHANGE IN MOMENTUM / TIME TAKEN FOR THIS CHANGE = FORCE x DISTANCE MOVED IN DIRECTION OF FORCE = ENERGY TRANSFERRED / TIME TAKEN = LOAD / EFFORT = DISTANCE MOVED BY EFFORT / DISTANCE MOVED BY LOAD = MASS x ACCELERATION = LOAD x DISTANCE LOAD MOVES / EFFORT x DISTANCE EFFORT MOVES = MASS x VELOCITY = MECHANICAL ADVANTAGE x 100 / VELOCITY RATIO = NUMBER OF TEETH IN DRIVEN WHEEL / NUMBER OF TEETH IN DRIVING WHEEL = PRESSURE x AREA = FORCE / AREA = MASS / VOLUME = ô# FORCE MOMENTUM FINAL VELOCITY AVERAGE POWER MECHANICAL ADVANTAGE f cdehx EQELEC . " . 5:5:1: &5,11 ;1;"SCISOFT" *14,5;"EDUCATIONAL PROGRAMS" (16,14;"FOR" 2&18,7;"SCIENCE STUDENTS" < 200 F d&6,11 ;1;"PHYSICS" n21,0;" 1983" x 200  |'8,6@;"REVISION QUESTIONS" "10 ,10 ;"ELECTRICITY"  100H 918,3;6;"PRESS ANY KEY TO CONTINUE." ""420R =""430W L Q=0 V G=0 ` Y=0 j Z=0  &6@,7`;"TYPE IN YOUR NAME" 28,1;"THEN PRESS ENTER TO CONTINUE." A$ A$=""1240 A$>181240 92,7;1;"HELLO ";6;0;A$ =6,1;1;"FIRST TYPE IN YOUR POINT SCORE." 512@,1;"IF THIS IS YOUR FIRST TIME THEN"  14`,12@;"TYPE 0" B$ b$=""1310:  #B$(1)>57913302 ('B$0ưB$100H1370+@ 2 <&"YOU HAVE PUSHED ";B$;", YOU SHOULD" F12,1;"HAVE PUSHED A NUMBER BETWEEN" I4,10 ;"0 AND 100" K;16,1;1;"NOW PRESS YOUR CORRECT GRADE" P118,5;1;"FOLLOWED BY ENTER." U 1310# ZB=B$ d n82,3;1;"YOU WILL NOW BE GIVEN SOME" x84,3;1;"MULTIPLE CHOICE QUESTIONS." ;7,2;4;"TO GAIN POINTS YOU MUST SCORE" 89 ,3;4;"AT LEAST SEVEN OUT OF TEN." B>014404 111 ,7;4;"YOU BEGIN AT ZERO." 515p,0;"WHEN YOU REACH 100 PTS YOU HAVE" 517,1;"COMPLETED THIS REVISION SERIES." 919,3;6;"PRESS ANY KEY TO CONTINUE." ""14707 =""14809  23@,2;"YOU ARE ADVISED NOT TO SPEND" 05 ,2;"TOO LONG AT ANY ONE SESSION" 49,1;"IF YOU DO THEN YOU WILL BE ABLE" 6110,1;"TO ANSWER THE QUESTIONS WITHOUT" 313 ,2;"REALLY KNOWING THE EQUATIONS." 917,3;6;"PRESS ANY KEY TO CONTINUE." ""1560C "=""1570D@ # $*0,10 ;1;"POINT SCORE" %A=120 &45 ,0;"7 OUT OF 10 ......... 6 POINTS" '47`,0;"8 OUT OF 10 .........10 POINTS" (49,0;"9 OUT OF 10 .........16 POINTS" )5110,0;"10 OUT OF 10 .........20 POINTS" *A ,E$(20,35#) -M$(5 ,35 ) .D$(20,80P) /C$(5 ,35 ) 0 F=1 2 Y1=1 3 Y2=2 4 Y3=3@ 5 Y4=4 6 Y5=5 8 :C=(*5)+1 <C=Y11604H =C=Y21606H >C=Y31608I ?C=Y41610I@ @C=Y51612I B 1594G@ D Y1=0 E 1614I F Y2=0 G 1614I H Y3=0 I 1614I J Y4=0 K 1614I L Y5=0 M 1614I N Z=Z+1 PZ=1W1=C RZ=2W2=C TZ=3@W3=C VZ=4W4=C XZ=5 W5=C YZ<5 1594G@ Z Z=0 \ZD$(1)="(No. OF TURNS IN SECONDARY x PRIMARY EMF) / No. OF TURNS IN PRIMARY =" ^&D$(2)="RESISTANCE x CURRENT =" h D$(3)="TIME x CURRENT =" r<D$(4)="POTENTIAL DIFFERENCE / RESISTANCE =" |FD$(5)="TOTAL QUANTITY OF ELECTRICITY x POTENTIAL DIFFERENCE =" 6D$(6)="POTENTIAL DIFFERENCE x CURRENT xTIME =" 0D$(7)="EMF OF CELL / TOTAL RESISTANCE =" 2D$(8)="WORK DONE / POTENTIAL DIFFERENCE =" !D$(9 )="POWER / CURRENT =" \D$(10 )="(No. OF TURNS IN PRIMARY x SECONDARY EMF) / No. OF TURNS INSECONDARY =" 1D$(11 )="POTENTIAL DIFFERENCE / CURRENT =" CD$(12 )="CURRENT FLOWING IN CIRCUIT x TOTAL RESISTANCE =" =D$(13 )="CURRENT x CURRENT x TIME x RESISTANCE =" /D$(14)="POWER / POTENTIAL DIFFERENCE =" )D$(15)="WORK DONE / TIME TAKEN =" *D$(16)="POTENTIAL x CAPACITANCE =" ]D$(17)="(TIME x POTENTIAL DIFFERENCE x POTENTIAL DIFFERENCE) / RESISTANCE =" 7D$(18)="TOTAL QUANTITY OF ELECTRICITY / TIME =" 1D$(19)="POTENTIAL DIFFERENCE x CURRENT =" %D$(20)="CHARGE / POTENTIAL =" !E$(1)=" SECONDARY EMF" &(E$(2)=" POTENTIAL DIFFERENCE" 0+E$(3)=" QUANTITY OF ELECTRICITY" :E$(4)=" CURRENT" DE$(5)=" WORK DONE" NE$(6)=" WORK DONE" X(E$(7)=" CURRENT IN A CIRCUIT" b+E$(8)=" QUANTITY OF ELECTRICITY" l(E$(9 )=" POTENTIAL DIFFERENCE" v E$(10 )=" PRIMARY EMF" E$(11 )=" RESISTANCE"  E$(12 )=" EMF OF CELL" E$(13 )=" WORK DONE" E$(14)=" CURRENT" E$(15)=" POWER" E$(16)=" CHARGE" E$(17)=" WORK DONE" E$(18)=" CURRENT" E$(19)=" POWER"  E$(20)=" CAPACITANCE" B100H3100A D=(20*)+1  !0,0;0;D$(D) G3,0;5;2;"" M$(1)=E$(D)  f=1 E=(20*)+1 E=D2040  F=F+1  M$(F)=E$(E)  F<5 2040 m$(1)=m$(2)m$(1)=m$(3)m$(1)=m$(4)m$(1)=m$(5)m$(2)=m$(3)m$(2)=m$(4)m$(2)=m$(5)m$(3)=m$(4)m$(3)=m$(5)m$(4)=m$(5)2037 C$(W1)=M$(1) C$(W2)=M$(2) C$(W3)=M$(3@) C$(W4)=M$(4) C$(W5)=M$(5 ) >$4,1;"1. ";C$(1) H$7,1;"2. ";C$(2) R%10 ,1;"3. ";C$(3) \%13 ,1;"4. ";C$(4) f%16,1;"5. ";C$(5) pC18,1;6;0;"TYPE IN THE NUMBER THAT YOU" z919,7;6;0;"THINK IS CORRECT." ""2180@ =""2190 C<"1"Ŧ>"5""YOU MUST PRESS A KEY BETWEEN 1 AND 5" <"1"Ŧ>"5"2160 H= C$(H)=E$(D)2410 A=110  ?3,3;6;2;"N0 YOUR ANSWER IS WRONG." A  Q=Q+1 -7`,1;"THE CORRECT ANSWER IS :-" 11 ,0;D$(D) 14,0;E$(D) 918,3;6;"PRESS ANY KEY TO CONTINUE." ""2330 $=""2340@ ) 3G+Q=10 4000z 8G+Q=10 2500@ ` 1584F j o>6,0;4;"WELL DONE YOUR ANSWER IS CORRECT" tA=15 ~A G=G+1 Q+G=10 4000z Q+G<10 1584F  B100H3100A Y=Y+Q Z=G+Z )0,10 ;1;"YOUR SCORE" W4,1;7;"RIGHT ANSWERS":4,17;7;"WRONG ANSWERS" 8,6@;G;238;Q (?16,0;6;"WOULD YOU LIKE FURTHER EQUATIONS" 2218,2;"PRESS Y FOR YES OR N FOR NO" <""2620# A=""2625$ P Q=0 U G=0 Z="Y"Ŧ="y"15840 d="N"Ŧ="n"2900T n,1;" YOU MUST PRESS EITHER Y OR N." x 2600" T ^*1;" WOULD YOU LIKE A LIST OF THE" h=2,0;1;"EQUATIONS USED IN THIS PROGRAM?" r08,2;"PRESS Y FOR YES OR N FOR NO" |""29407 =""29508` ="N"Ŧ="n"3100 ="Y"Ŧ="y"3000 <14,1;6;"YOU MUST PRESS EITHER Y OR N." 29407 A=120  D$(A) 4,4;E$(A) 918,2;6;"PRESS ANY KEY FOR THE NEXT" )20,14;6;"EQUATION." ""3060?@ =""3070? A  &!7`,7`;"GOODBYE ";A$ 0?B100d15,1;"YOU HAVE REACHED 100 POINTS." H 3110&    G<7` A=110 *4,11 ;7;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." (4,11 ;3;"WELL DONE" :6,1;1;"YOU HAVE GAINED SOME POINTS." A 4,11 ;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." G=7`X=6@ G=8X=10 G=9X=16 G=10 X=20 >13 ,0;1;"YOUR POINT SCORE IS NOW :- ";B+X B=B+X B<100H4170P ",17,5 ;"YOU HAVE NOW COMPLETED" ,,19,5;"THIS REVISION PROGRAM." JA=1200 TA h qgy@zAkenB1b # SECONDARY EMF POTENTIAL DIFFERENCE QUANTITY OF ELECTRICITY CURRENT WORK DONE WORK DONE CURRENT IN A CIRCUIT QUANTITY OF ELECTRICITY POTENTIAL DIFFERENCE PRIMARY EMF RESISTANCE EMF OF CELL WORK DONE CURRENT POWER CHARGE WORK DONE CURRENT POWER CAPACITANCE ʹ# EMF OF CELL POWER WORK DONE RESISTANCE CURRENT EP(No. OF TURNS IN SECONDARY x PRIMARY EMF) / No. OF TURNS IN PRIMARY = RESISTANCE x CURRENT = TIME x CURRENT = POTENTIAL DIFFERENCE / RESISTANCE = TOTAL QUANTITY OF ELECTRICITY x POTENTIAL DIFFERENCE = POTENTIAL DIFFERENCE x CURRENT xTIME = EMF OF CELL / TOTAL RESISTANCE = WORK DONE / POTENTIAL DIFFERENCE = POWER / CURRENT = (No. OF TURNS IN PRIMARY x SECONDARY EMF) / No. OF TURNS INSECONDARY = POTENTIAL DIFFERENCE / CURRENT = CURRENT FLOWING IN CIRCUIT x TOTAL RESISTANCE = CURRENT x CURRENT x TIME x RESISTANCE = POWER / POTENTIAL DIFFERENCE = WORK DONE / TIME TAKEN = POTENTIAL x CAPACITANCE = (TIME x POTENTIAL DIFFERENCE x POTENTIAL DIFFERENCE) / RESISTANCE = TOTAL QUANTITY OF ELECTRICITY / TIME = POTENTIAL DIFFERENCE x CURRENT = CHARGE / POTENTIAL = ô# WORK DONE EMF OF CELL RESISTANCE CURRENT POWER f cd ehEQLIGHT / $/ 5:5:1: &5,11 ;1;"SCISOFT" *14,5;"EDUCATIONAL PROGRAMS" (16,14;"FOR" 2&18,7;"SCIENCE STUDENTS" < 200 F d&6,11 ;1;"PHYSICS" n21,0;" 1983" x 200  |'8,6;"REVISION QUESTIONS" #10 ,9 ;"LIGHT & SOUND"  100H 918,3;6;"PRESS ANY KEY TO CONTINUE." ""420R =""430W L Q=0 V G=0 ` Y=0 j Z=0  &6@,7`;"TYPE IN YOUR NAME" 28,1;"THEN PRESS ENTER TO CONTINUE." A$ A$=""1240 A$>181240 92,7;1;"HELLO ";6;0;A$ =6,1;1;"FIRST TYPE IN YOUR POINT SCORE." 512@,1;"IF THIS IS YOUR FIRST TIME THEN"  14`,12@;"TYPE 0" B$ b$=""1310:  #B$(1)>57913302 ('B$0ưB$100H1370+@ 2 <&"YOU HAVE PUSHED ";B$;", YOU SHOULD" F12,1;"HAVE PUSHED A NUMBER BETWEEN" I4,10 ;"0 AND 100" K;16,1;1;"NOW PRESS YOUR CORRECT GRADE" P118,5;1;"FOLLOWED BY ENTER." U 1310# ZB=B$ d n82,3;1;"YOU WILL NOW BE GIVEN SOME" x84,3;1;"MULTIPLE CHOICE QUESTIONS." ;7,2;4;"TO GAIN POINTS YOU MUST SCORE" 89 ,3;4;"AT LEAST SEVEN OUT OF TEN." B>014404 111 ,7;4;"YOU BEGIN AT ZERO." 515p,0;"WHEN YOU REACH 100 PTS YOU HAVE" 517,1;"COMPLETED THIS REVISION SERIES." 919,3;6;"PRESS ANY KEY TO CONTINUE." ""14707 =""14809  23@,2;"YOU ARE ADVISED NOT TO SPEND" 05 ,2;"TOO LONG AT ANY ONE SESSION" 49,1;"IF YOU DO THEN YOU WILL BE ABLE" 6110,1;"TO ANSWER THE QUESTIONS WITHOUT" 313 ,2;"REALLY KNOWING THE EQUATIONS." 917,3;6;"PRESS ANY KEY TO CONTINUE." ""1560C "=""1570D@ # $*0,10 ;1;"POINT SCORE" %A=120 &45 ,0;"7 OUT OF 10 ......... 6 POINTS" '47`,0;"8 OUT OF 10 .........10 POINTS" (49,0;"9 OUT OF 10 .........16 POINTS" )5110,0;"10 OUT OF 10 .........20 POINTS" *A ,E$(20,35#) -M$(5 ,35 ) .D$(20,90Z) /C$(5 ,35 ) 0 F=1 2 Y1=1 3 Y2=2 4 Y3=3@ 5 Y4=4 6 Y5=5 8 :C=(*5)+1 <C=Y11604H =C=Y21606H >C=Y31608I ?C=Y41610I@ @C=Y51612I B 1594G@ D Y1=0 E 1614I F Y2=0 G 1614I H Y3=0 I 1614I J Y4=0 K 1614I L Y5=0 M 1614I N Z=Z+1 PZ=1W1=C RZ=2W2=C TZ=3@W3=C VZ=4W4=C XZ=5 W5=C YZ<5 1594G@ Z Z=0 \YD$(1)="VELOCITY OF WAVE IN FIRST MEDIUM/ VELOCITY OF WAVE IN SECOND MEDIUM. =" ^cD$(2)="A CONSTANT x THE SQ. ROOT OF (1 / MASS PER UNIT LENGTH OF A STRETCHED STRING) =" hKD$(3)="IMAGE DISTANCE FROM LENS / OBJECT DISTANCE FROM LENS =" rED$(4)="REFRACTIVE INDEX x SINE OF THE ANGLE OF REFRACTION =" |(D$(5)="FREQUENCY x WAVELENGTH =" QD$(6)="(IMAGE HEIGHT x OBJECT DISTANCE FROM PINHOLE) / OBJECT HEIGHT =" 8D$(7)="HEIGHT OF IMAGE / HEIGHT OF OBJECT =" RD$(8)="SINE OF THE ANGLE OF INCIDENCE /SINE OF THE ANGLE OF REFRACTION =" BD$(9 )="SINE OF THE ANGLE OF INCIDENCE /REFRACTIVE INDEX =" -D$(10 )="WAVE VELOCITY / WAVELENGTH =" OD$(11 )="IMAGE DISTANCE FROM PINHOLE / OBJECT DISTANCE FROM PINHOLE =" 1D$(12 )="1 / SINE OF THE CRITICAL ANGLE =" `D$(13 )="(IMAGE DISTANCE FROM PINHOLE x OBJECT HEIGHT) / OBJECT DISTANCEFROM PINHOLE =" GD$(14)="(1 / LENGTH OF A STRETCHED STRING) x A CONSTANT =" OD$(15)="REFRACTIVE INDEX - AIR TO WATER x VELOCITY OF LIGHT IN WATER =" ND$(16)="IMAGE DISTANCE FROM MIRROR / OBJECT DISTANCE FROM MIRROR =" .D$(17)="REAL DEPTH / APPARENT DEPTH =" ,D$(18)="WAVE VELOCITY / FREQUENCY =" PD$(19)="A CONSTANT x THE SQ. ROOT OF THETENSION IN A STRETCHED STRING =" &D$(20)="ANGLE OF REFLECTION =" !E$(1)=" REFRACTIVE INDEX" &E$(2)=" FREQUENCY" 0E$(3)=" MAGNIFICATION" :+E$(4)=" SINE OF THE INCIDENT ANGLE" DE$(5)=" WAVE VELOCITY" N,E$(6)=" IMAGE DISTANCE FROM PINHOLE" XE$(7)=" MAGNIFICATION" b!E$(8)=" REFRACTIVE INDEX" l,E$(9 )=" SINE OF THE REFRACTED ANGLE" vE$(10 )=" FREQUENCY" E$(11 )=" MAGNIFICATION" "E$(12 )=" REFRACTIVE INDEX" !E$(13 )=" HEIGHT OF IMAGE" E$(14)=" FREQUENCY" *E$(15)=" VELOCITY OF LIGHT IN AIR" E$(16)=" MAGNIFICATION" "E$(17)=" REFRACTIVE INDEX" E$(18)=" WAVELENGTH" E$(19)=" FREQUENCY" $E$(20)=" ANGLE OF INCIDENCE" B100H3100A D=(20*)+1  !0,0;0;D$(D) G3,0;5;2;"" M$(1)=E$(D)  f=1 E=(20*)+1 E=D2040  F=F+1  M$(F)=E$(E)  F<5 2040 m$(1)=m$(2)m$(1)=m$(3)m$(1)=m$(4)m$(1)=m$(5)m$(2)=m$(3)m$(2)=m$(4)m$(2)=m$(5)m$(3)=m$(4)m$(3)=m$(5)m$(4)=m$(5)2037 C$(W1)=M$(1) C$(W2)=M$(2) C$(W3)=M$(3@) C$(W4)=M$(4) C$(W5)=M$(5 ) >$4,1;"1. ";C$(1) H$7,1;"2. ";C$(2) R%10 ,1;"3. ";C$(3) \%13 ,1;"4. ";C$(4) f%16,1;"5. ";C$(5) pC18,1;6;0;"TYPE IN THE NUMBER THAT YOU" z919,7;6;0;"THINK IS CORRECT." ""2180@ =""2190 C<"1"Ŧ>"5""YOU MUST PRESS A KEY BETWEEN 1 AND 5" <"1"Ŧ>"5"2160 H= C$(H)=E$(D)2410 A=110  ?3,3;6;2;"NO YOUR ANSWER IS WRONG." A  Q=Q+1 -7`,1;"THE CORRECT ANSWER IS :-" 11 ,0;D$(D) 14`,1;E$(D) 918,3;6;"PRESS ANY KEY TO CONTINUE." ""2330 $=""2340@ ) 3G+Q=10 4000z 8G+Q=10 2500@ ` 1584F j o>6,0;4;"WELL DONE YOUR ANSWER IS CORRECT" tA=15 ~A G=G+1 Q+G=10 4000z Q+G<10 1584F  B100H3100A Y=Y+Q Z=G+Z )0,10 ;1;"YOUR SCORE" W4,1;7;"RIGHT ANSWERS":4,17;7;"WRONG ANSWERS" 8,6@;G;238;Q (?16,0;6;"WOULD YOU LIKE FURTHER EQUATIONS" 2218,2;"PRESS Y FOR YES OR N FOR NO" <""2620# A=""2625$ P Q=0 U G=0 Z="Y"Ŧ="y"15840 d="N"Ŧ="n"2900T n,1;" YOU MUST PRESS EITHER Y OR N." x 2600" T ^*1;" WOULD YOU LIKE A LIST OF THE" h=2,0;1;"EQUATIONS USED IN THIS PROGRAM?" r08,2;"PRESS Y FOR YES OR N FOR NO" |""29407 =""29508` ="N"Ŧ="n"3100 ="Y"Ŧ="y"3000 <14,1;6;"YOU MUST PRESS EITHER Y OR N." 29407 A=120  D$(A) 4,4;E$(A) 918,2;6;"PRESS ANY KEY FOR THE NEXT" )20,14;6;"EQUATION." ""3060?@ =""3070? A  &!7`,7`;"GOODBYE ";A$ 0?B100d15,1;"YOU HAVE REACHED 100 POINTS." H 3110&    G<7` A=110 *4,11 ;7;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." (4,11 ;3;"WELL DONE" :6,1;1;"YOU HAVE GAINED SOME POINTS." A 4,11 ;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." G=7`X=6@ G=8X=10 G=9X=16 G=10 X=20 >13 ,0;1;"YOUR POINT SCORE IS NOW :- ";B+X B=B+X B<100H4170P ",17,5 ;"YOU HAVE NOW COMPLETED" ,,19,5;"THIS REVISION PROGRAM." JA=1200 TA h qgyz AKENB3b8 # REFRACTIVE INDEX FREQUENCY MAGNIFICATION SINE OF THE INCIDENT ANGLE WAVE VELOCITY IMAGE DISTANCE FROM PINHOLE MAGNIFICATION REFRACTIVE INDEX SINE OF THE REFRACTED ANGLE FREQUENCY MAGNIFICATION REFRACTIVE INDEX HEIGHT OF IMAGE FREQUENCY VELOCITY OF LIGHT IN AIR MAGNIFICATION REFRACTIVE INDEX WAVELENGTH FREQUENCY ANGLE OF INCIDENCE ʹ# HEIGHT OF IMAGE ANGLE OF INCIDENCE FREQUENCY WAVE VELOCITY MAGNIFICATION ZVELOCITY OF WAVE IN FIRST MEDIUM/ VELOCITY OF WAVE IN SECOND MEDIUM. = A CONSTANT x THE SQ. ROOT OF (1 / MASS PER UNIT LENGTH OF A STRETCHED STRING) = IMAGE DISTANCE FROM LENS / OBJECT DISTANCE FROM LENS = REFRACTIVE INDEX x SINE OF THE ANGLE OF REFRACTION = FREQUENCY x WAVELENGTH = (IMAGE HEIGHT x OBJECT DISTANCE FROM PINHOLE) / OBJECT HEIGHT = HEIGHT OF IMAGE / HEIGHT OF OBJECT = SINE OF THE ANGLE OF INCIDENCE /SINE OF THE ANGLE OF REFRACTION = SINE OF THE ANGLE OF INCIDENCE /REFRACTIVE INDEX = WAVE VELOCITY / WAVELENGTH = IMAGE DISTANCE FROM PINHOLE / OBJECT DISTANCE FROM PINHOLE = 1 / SINE OF THE CRITICAL ANGLE = (IMAGE DISTANCE FROM PINHOLE x OBJECT HEIGHT) / OBJECT DISTANCEFROM PINHOLE = (1 / LENGTH OF A STRETCHED STRING) x A CONSTANT = REFRACTIVE INDEX - AIR TO WATER x VELOCITY OF LIGHT IN WATER = IMAGE DISTANCE FROM MIRROR / OBJECT DISTANCE FROM MIRROR = REAL DEPTH / APPARENT DEPTH = WAVE VELOCITY / FREQUENCY = A CONSTANT x THE SQ. ROOT OF THETENSION IN A STRETCHED STRING = ANGLE OF REFLECTION = ô# HEIGHT OF IMAGE FREQUENCY WAVE VELOCITY MAGNIFICATION ANGLE OF INCIDENCE f cd ehx !EQHEAT c. R#:e. 5:5:1: &5,11 ;1;"SCISOFT" *14,5;"EDUCATIONAL PROGRAMS" (16,14;"FOR" 2&18,7;"SCIENCE STUDENTS" < 200 F d&6,11 ;1;"PHYSICS" n21,0;" 1983" x 200  |'8,6@;"REVISION QUESTIONS" %10 ,8;"HEAT & PRESSURE"  100H 918,3;6;"PRESS ANY KEY TO CONTINUE." ""420R =""430W L Q=0 V G=0 ` Y=0 j Z=0  &6@,7`;"TYPE IN YOUR NAME" 28,1;"THEN PRESS ENTER TO CONTINUE." A$ A$=""1240 A$>181240 92,7;1;"HELLO ";6;0;A$ =6,1;1;"FIRST TYPE IN YOUR POINT SCORE." 512@,1;"IF THIS IS YOUR FIRST TIME THEN"  14`,12@;"TYPE 0" B$ b$=""1310:  #B$(1)>57913302 ('B$0ưB$100H1370+@ 2 <&"YOU HAVE PUSHED ";B$;", YOU SHOULD" F12,1;"HAVE PUSHED A NUMBER BETWEEN" I4,10 ;"0 AND 100" K;16,1;1;"NOW PRESS YOUR CORRECT GRADE" P118,5;1;"FOLLOWED BY ENTER." U 1310# ZB=B$ d n82,3;1;"YOU WILL NOW BE GIVEN SOME" x84,3;1;"MULTIPLE CHOICE QUESTIONS." ;7,2;4;"TO GAIN POINTS YOU MUST SCORE" 89 ,3;4;"AT LEAST SEVEN OUT OF TEN." B>014404 111 ,7;4;"YOU BEGIN AT ZERO." 515p,0;"WHEN YOU REACH 100 PTS YOU HAVE" 517,1;"COMPLETED THIS REVISION SERIES." 919,3;6;"PRESS ANY KEY TO CONTINUE." ""14707 =""14809  13,1;"YOU ARE ADVISED NOT TO SPEND" 05 ,2;"TOO LONG AT ANY ONE SESSION" 49,1;"IF YOU DO THEN YOU WILL BE ABLE" 6110,1;"TO ANSWER THE QUESTIONS WITHOUT" 313 ,2;"REALLY KNOWING THE EQUATIONS." 917,3;6;"PRESS ANY KEY TO CONTINUE." ""1560C "=""1570D@ # $*0,10 ;1;"POINT SCORE" %A=120 &45 ,0;"7 OUT OF 10 ......... 6 POINTS" '47`,0;"8 OUT OF 10 .........10 POINTS" (49,0;"9 OUT OF 10 .........16 POINTS" )5110,0;"10 OUT OF 10 .........20 POINTS" *A ,E$(20,35#) -M$(5 ,35 ) .D$(20,80P) /C$(5 ,35 ) 0 F=1 2 Y1=1 3 Y2=2 4 Y3=3@ 5 Y4=4 6 Y5=5 8 :C=(*5)+1 <C=Y11604H =C=Y21606H >C=Y31608I ?C=Y41610I@ @C=Y51612I B 1594G@ D Y1=0 E 1614I F Y2=0 G 1614I H Y3=0 I 1614I J Y4=0 K 1614I L Y5=0 M 1614I N Z=Z+1 PZ=1W1=C RZ=2W2=C TZ=3@W3=C VZ=4W4=C XZ=5 W5=C YZ<5 1594G@ Z Z=0 \FD$(1)="EXPANSION / (ORIGINAL LENGTH x RISE IN TEMPERATURE) =" ^2D$(2)="(PRESSURE x VOLUME) / A CONSTANT =" hDD$(3)="MASS x SPECIFIC HEAT CAPACITY x TEMPERATURE CHANGE =" r7D$(4)="HEAT GIVEN OUT / SPECIFIC LATENT HEAT =" |D$(5)="FORCE / AREA =" 8D$(6)="(TEMPERATURE x A CONSTANT) / VOLUME =" ND$(7)="LINEAR EXPANSIVITY x ORIGINAL LENGTH x RISE IN TEMPERATURE =" LD$(8)="(FORCE OF GRAVITY x HEIGHT FALLEN) / TEMPERATURE RISE =" -D$(9 )="MASS x SPECIFIC LATENT HEAT =" 0D$(10 )="HEAT TAKEN IN / HEAT CAPACITY =" JD$(11 )="HEAT GIVEN OUT / (MASS x SPECIFIC HEAT CAPACITY) =" ;D$(12 )="(TEMPERATURE x A CONSTANT) / PRESSURE =" ED$(13 )="EXPANSION / (ORIGINAL LENGTH x LINEAR EXPANSIVITY =" /D$(14)="HEAT ENERGY GIVEN OUT / MASS =" 9D$(15)="HEAT CAPACITY x TEMPERATURE CHANGE =" \D$(16)="HEAT GIVEN OUT / (CHANGE IN TEMPERATURE x SPECIFIC HEAT CAPACITY) =" .D$(17)="MASS x SPECIFIC LATENT HEAT =" 9D$(18)="HEAT GIVEN OUT / TEMPERATURE CHANGE =" SD$(19)="(FORCE OF GRAVITY x HEIGHT FALLEN) / SPECIFIC HEAT CAPACITY =" AD$(20)="HEAT TAKEN IN / (MASS x CHANGE IN TEMPERATURE =" #E$(1)=" LINEAR EXPANSIVITY" &E$(2)=" TEMPERATURE" 0E$(3)=" HEAT GIVEN OUT" :E$(4)=" MASS" DE$(5)=" PRESSURE" NE$(6)=" PRESSURE" XE$(7)=" EXPANSION" b'E$(8)=" SPECIFIC HEAT CAPACITY" lE$(9 )=" HEAT GIVEN OUT" v$E$(10 )=" TEMPERATURE CHANGE" $E$(11 )=" TEMPERATURE CHANGE" E$(12 )=" VOLUME" %E$(13 )=" RISE IN TEMPERATURE" &E$(14)=" SPECIFIC LATENT HEAT"  E$(15)=" HEAT GIVEN OUT" E$(16)=" MASS"  E$(17)=" HEAT GIVEN OUT" E$(18)=" HEAT CAPACITY" "E$(19)=" TEMPERATURE RISE" (E$(20)=" SPECIFIC HEAT CAPACITY" B100H3100A D=(20*)+1  !0,0;0;D$(D) G3,0;5;2;"" M$(1)=E$(D)  f=1 E=(20*)+1 E=D2040  F=F+1  M$(F)=E$(E)  F<5 2040 m$(1)=m$(2)m$(1)=m$(3)m$(1)=m$(4)m$(1)=m$(5)m$(2)=m$(3)m$(2)=m$(4)m$(2)=m$(5)m$(3)=m$(4)m$(3)=m$(5)m$(4)=m$(5)2037 C$(W1)=M$(1) C$(W2)=M$(2) C$(W3)=M$(3@) C$(W4)=M$(4) C$(W5)=M$(5 ) >$4,1;"1. ";C$(1) H$7,1;"2. ";C$(2) R%10 ,1;"3. ";C$(3) \%13 ,1;"4. ";C$(4) f%16,1;"5. ";C$(5) pC18,1;6;0;"TYPE IN THE NUMBER THAT YOU" z919,7;6;0;"THINK IS CORRECT." ""2180@ =""2190 C<"1"Ŧ>"5""YOU MUST PRESS A KEY BETWEEN 1 AND 5" <"1"Ŧ>"5"2160 H= C$(H)=E$(D)2410 A=110  ?3,3;6;2;"NO YOUR ANSWER IS WRONG." A  Q=Q+1 -7`,1;"THE CORRECT ANSWER IS :-" 11 ,0;D$(D) 14`,1;E$(D) 918,3;6;"PRESS ANY KEY TO CONTINUE." ""2330 $=""2340@ ) 3G+Q=10 4000z 8G+Q=10 2500@ ` 1584F j o>6,0;4;"WELL DONE YOUR ANSWER IS CORRECT" tA=15 ~A G=G+1 Q+G=10 4000z Q+G<10 1584F  B100H3100A Y=Y+Q Z=G+Z )0,10 ;1;"YOUR SCORE" W4,1;7;"RIGHT ANSWERS":4,17;7;"WRONG ANSWERS" 8,6@;G;238;Q (?16,0;6;"WOULD YOU LIKE FURTHER EQUATIONS" 2218,2;"PRESS Y FOR YES OR N FOR NO" <""2620# A=""2625$ P Q=0 U G=0 Z="Y"Ŧ="y"15840 d="N"Ŧ="n"2900T n,1;" YOU MUST PRESS EITHER Y OR N." x 2600" T ^*1;" WOULD YOU LIKE A LIST OF THE" h=2,0;1;"EQUATIONS USED IN THIS PROGRAM?" r08,2;"PRESS Y FOR YES OR N FOR NO" |""29407 =""29508` ="N"Ŧ="n"3100 ="Y"Ŧ="y"3000 <14,1;6;"YOU MUST PRESS EITHER Y OR N." 29407 A=120  D$(A) 4,4;E$(A) 918,2;6;"PRESS ANY KEY FOR THE NEXT" )20,14;6;"EQUATION." ""3060?@ =""3070? A  &!7`,7`;"GOODBYE ";A$ 0?B100d15,1;"YOU HAVE REACHED 100 POINTS." H 3110&    G<7` A=110 *4,11 ;7;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." (4,11 ;3;"WELL DONE" :6,1;1;"YOU HAVE GAINED SOME POINTS." A 4,11 ;"WELL DONE" 16,1;"YOU HAVE GAINED SOME POINTS." G=7`X=6@ G=8X=10 G=9X=16 G=10 X=20 >13 ,0;1;"YOUR POINT SCORE IS NOW :- ";B+X B=B+X B<100H4170P ",17,5 ;"YOU HAVE NOW COMPLETED" ,,19,5;"THIS REVISION PROGRAM." JA=1200 TA h qgyzb AFB8# LINEAR EXPANSIVITY TEMPERATURE HEAT GIVEN OUT MASS PRESSURE PRESSURE EXPANSION SPECIFIC HEAT CAPACITY HEAT GIVEN OUT TEMPERATURE CHANGE TEMPERATURE CHANGE VOLUME RISE IN TEMPERATURE SPECIFIC LATENT HEAT HEAT GIVEN OUT MASS HEAT GIVEN OUT HEAT CAPACITY TEMPERATURE RISE SPECIFIC HEAT CAPACITY ʹ# MASS HEAT GIVEN OUT HEAT GIVEN OUT HEAT GIVEN OUT HEAT GIVEN OUT EPEXPANSION / (ORIGINAL LENGTH x RISE IN TEMPERATURE) = (PRESSURE x VOLUME) / A CONSTANT = MASS x SPECIFIC HEAT CAPACITY x TEMPERATURE CHANGE = HEAT GIVEN OUT / SPECIFIC LATENT HEAT = FORCE / AREA = (TEMPERATURE x A CONSTANT) / VOLUME = LINEAR EXPANSIVITY x ORIGINAL LENGTH x RISE IN TEMPERATURE = (FORCE OF GRAVITY x HEIGHT FALLEN) / TEMPERATURE RISE = MASS x SPECIFIC LATENT HEAT = HEAT TAKEN IN / HEAT CAPACITY = HEAT GIVEN OUT / (MASS x SPECIFIC HEAT CAPACITY) = (TEMPERATURE x A CONSTANT) / PRESSURE = EXPANSION / (ORIGINAL LENGTH x LINEAR EXPANSIVITY = HEAT ENERGY GIVEN OUT / MASS = HEAT CAPACITY x TEMPERATURE CHANGE = HEAT GIVEN OUT / (CHANGE IN TEMPERATURE x SPECIFIC HEAT CAPACITY) = MASS x SPECIFIC LATENT HEAT = HEAT GIVEN OUT / TEMPERATURE CHANGE = (FORCE OF GRAVITY x HEIGHT FALLEN) / SPECIFIC HEAT CAPACITY = HEAT TAKEN IN / (MASS x CHANGE IN TEMPERATURE = ô# fcde