MATHS
FILE INFORMATION
FILENAME(S): MATHS
FILE TYPE(S): PRG
FILE SIZE: 8.9K
FIRST SEEN: 2025-12-02 02:15:03
APPEARS ON: 1 disk(s)
FILE HASH
a89ee3ec58ad79550d6cb2d9534d0cd75bbc2e85988ea732fed1586792c9ba4a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PANS EDUCA 03 | MATHS | PRG | The BAM Archive | 9 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 16 08 01 00 8F 20 20 4D 41 54 48 20 50 52 |....... MATH PR|
00000010: 41 43 54 49 43 45 00 1C 08 02 00 8F 00 3C 08 03 |ACTICE.......<..|
00000020: 00 97 20 35 33 32 38 31 2C 31 32 3A 97 20 35 33 |.. 53281,12:. 53|
00000030: 32 38 30 2C 31 32 3A 99 22 1F 93 22 00 6C 08 04 |280,12:."..".l..|
00000040: 00 99 22 11 11 11 11 11 11 11 11 11 11 4D 41 54 |.."..........MAT|
00000050: 48 20 50 52 41 43 54 49 43 45 22 3A 99 22 2D 2D |H PRACTICE":."--|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 90 08 05 |-----------"....|
00000070: 00 99 22 50 52 4F 47 52 41 4D 4D 45 44 20 42 59 |.."PROGRAMMED BY|
00000080: 20 12 45 52 57 49 4E 20 52 4F 44 59 4E 53 92 22 | .ERWIN RODYNS."|
00000090: 00 AA 08 06 00 99 22 11 4F 4E 20 32 31 2F 31 32 |......".ON 21/12|
000000A0: 2F 27 38 33 22 3A 99 22 90 22 00 BB 08 0A 00 81 |/'83":."."......|
000000B0: 20 58 B2 31 A4 34 30 30 30 3A 82 00 EC 08 0E 00 | X.1.4000:......|
000000C0: 99 22 93 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.".*************|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 1C 09 0F |***********"....|
000000F0: 00 99 22 2A 20 20 20 20 20 20 20 20 20 20 20 20 |.."* |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 20 20 20 20 20 20 20 2A 22 00 4C 09 10 | *".L..|
00000120: 00 99 22 2A 20 20 20 20 20 20 20 20 20 20 20 20 |.."* |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 20 20 20 20 20 20 20 20 20 20 2A 22 00 80 09 11 | *"....|
00000150: 00 99 22 2A 20 20 20 20 20 20 20 20 20 20 20 20 |.."* |
00000160: 20 20 12 1C 4D 45 4E 55 92 90 20 20 20 20 20 20 | ..MENU.. |
00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 | *"|
00000180: 00 B4 09 12 00 99 22 2A 20 20 20 20 20 20 20 20 |......"* |
00000190: 20 20 20 20 20 20 3D 3D 3D 3D 20 20 20 20 20 20 | ==== |
000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 | *"|
000001B0: 3A 99 3A 99 00 E4 09 13 00 99 22 2A 20 20 31 2E |:.:......."* 1.|
000001C0: 20 4D 55 4C 54 49 50 4C 49 43 41 54 49 4F 4E 20 | MULTIPLICATION |
000001D0: 2D 2D 2D 2D 3E 20 41 20 20 20 20 20 20 20 20 20 |----> A |
000001E0: 20 20 2A 22 00 14 0A 14 00 99 22 2A 20 20 32 2E | *"......"* 2.|
000001F0: 20 44 49 56 49 53 49 4F 4E 20 20 20 20 20 20 20 | DIVISION |
00000200: 2D 2D 2D 2D 3E 20 42 20 20 20 20 20 20 20 20 20 |----> B |
00000210: 20 20 2A 22 00 44 0A 15 00 99 22 2A 20 20 33 2E | *".D...."* 3.|
00000220: 20 53 55 42 54 52 41 43 54 49 4F 4E 20 20 20 20 | SUBTRACTION |
00000230: 2D 2D 2D 2D 3E 20 43 20 20 20 20 20 20 20 20 20 |----> C |
00000240: 20 20 2A 22 00 74 0A 16 00 99 22 2A 20 20 34 2E | *".t...."* 4.|
00000250: 20 41 44 44 49 54 49 4F 4E 20 20 20 20 20 20 20 | ADDITION |
00000260: 2D 2D 2D 2D 3E 20 44 20 20 20 20 20 20 20 20 20 |----> D |
00000270: 20 20 2A 22 00 A6 0A 17 00 99 22 2A 2A 2A 2A 2A | *"......"*****|
00000280: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002A0: 2A 2A 2A 22 3A 99 00 C0 0A 19 00 99 22 50 52 49 |***":......."PRI|
000002B0: 4E 54 20 59 4F 55 52 20 43 48 4F 49 43 45 2E 22 |NT YOUR CHOICE."|
000002C0: 00 D6 0A 1E 00 A1 20 41 24 3A 8B 20 41 24 B2 22 |...... A$:. A$."|
000002D0: 41 22 A7 20 34 30 00 E9 0A 1F 00 8B 20 41 24 B2 |A". 40...... A$.|
000002E0: 22 42 22 A7 20 31 30 30 30 00 FC 0A 20 00 8B 20 |"B". 1000... .. |
000002F0: 41 24 B2 22 43 22 A7 20 32 30 30 30 00 0F 0B 21 |A$."C". 2000...!|
00000300: 00 8B 20 41 24 B2 22 44 22 A7 20 33 30 30 30 00 |.. A$."D". 3000.|
00000310: 40 0B 22 00 8B 20 41 24 B3 B1 22 41 22 20 AF 20 |@.".. A$.."A" . |
00000320: 41 24 B3 B1 22 42 22 20 AF 20 41 24 B3 B1 22 43 |A$.."B" . A$.."C|
00000330: 22 20 AF 20 41 24 B3 B1 22 44 22 20 A7 20 33 30 |" . A$.."D" . 30|
00000340: 00 66 0B 27 00 8F 20 20 20 20 20 20 20 20 20 20 |.f.'.. |
00000350: 20 20 20 20 20 20 20 20 4D 55 4C 54 49 50 4C 49 | MULTIPLI|
00000360: 43 41 54 49 4F 4E 00 6E 0B 28 00 59 B2 31 00 76 |CATION.n.(.Y.1.v|
00000370: 0B 32 00 53 B2 31 00 7F 0B 3C 00 4D B2 35 30 00 |.2.S.1...<.M.50.|
00000380: 88 0B 46 00 43 4F B2 30 00 91 0B 50 00 57 4F B2 |..F.CO.0...P.WO.|
00000390: 30 00 9D 0B 5A 00 86 20 52 24 28 35 29 00 A8 0B |0...Z.. R$(5)...|
000003A0: 64 00 86 20 41 28 35 29 00 B4 0B 6E 00 86 20 4E |d.. A(5)...n.. N|
000003B0: 31 28 35 29 00 C0 0B 78 00 86 20 4E 32 28 35 29 |1(5)...x.. N2(5)|
000003C0: 00 CB 0B 82 00 86 20 43 28 35 29 00 E8 0B 88 00 |...... C(5).....|
000003D0: 97 20 35 33 32 38 30 2C 33 3A 97 20 35 33 32 38 |. 53280,3:. 5328|
000003E0: 31 2C 33 3A 99 22 90 22 00 33 0C 8C 00 99 20 22 |1,3:.".".3.... "|
000003F0: 93 45 4E 54 45 52 20 54 48 45 20 4E 55 4D 42 45 |.ENTER THE NUMBE|
00000400: 52 20 4F 46 20 44 49 47 49 54 53 20 46 4F 52 20 |R OF DIGITS FOR |
00000410: 54 48 45 20 20 20 20 20 20 50 52 41 43 54 49 43 |THE PRACTIC|
00000420: 45 20 4E 55 4D 45 52 53 2E 20 28 4D 41 58 2E 20 |E NUMERS. (MAX. |
00000430: 34 29 22 00 3B 0C 96 00 85 20 53 00 72 0C A0 00 |4)".;.... S.r...|
00000440: 99 22 48 4F 57 20 4D 41 4E 59 20 49 54 45 4D 53 |."HOW MANY ITEMS|
00000450: 20 53 48 41 4C 4C 20 49 20 50 52 49 4E 54 28 35 | SHALL I PRINT(5|
00000460: 2C 31 30 2C 31 35 2C 32 30 2C 45 54 43 2E 2E 2E |,10,15,20,ETC...|
00000470: 29 22 00 7A 0C AA 00 85 20 4D 00 80 0C B4 00 99 |)".z.... M......|
00000480: 00 86 0C BE 00 99 00 AC 0C C8 00 8F 20 2A 2A 2A |............ ***|
00000490: 2A 2A 2A 20 50 52 4F 43 45 53 53 49 4E 47 20 41 |*** PROCESSING A|
000004A0: 52 45 41 20 2A 2A 2A 2A 2A 2A 2A 2A 00 BB 0C D2 |REA ********....|
000004B0: 00 81 20 49 B2 31 A4 20 4D AD 35 00 C8 0C DC 00 |.. I.1. M.5.....|
000004C0: 81 20 4A B2 31 A4 20 35 00 DF 0C E6 00 4E 31 28 |. J.1. 5.....N1(|
000004D0: 4A 29 B2 B5 28 BB 28 59 29 AC 31 30 AE 53 29 00 |J)..(.(Y).10.S).|
000004E0: F6 0C F0 00 4E 32 28 4A 29 B2 B5 28 BB 28 59 29 |....N2(J)..(.(Y)|
000004F0: AC 31 30 AE 53 29 00 FE 0C FA 00 82 20 4A 00 0A |.10.S)...... J..|
00000500: 0D 04 01 81 20 4A B2 31 A4 35 00 15 0D 0E 01 99 |.... J.1.5......|
00000510: 20 22 20 22 3B 00 22 0D 18 01 81 20 4B B2 20 31 | " ";.".... K. 1|
00000520: A4 53 00 3E 0D 22 01 8B 20 4E 31 28 4A 29 B1 B2 |.S.>.".. N1(J)..|
00000530: 31 30 AE 28 53 AB 4B 29 20 A7 20 33 33 30 00 58 |10.(S.K) . 330.X|
00000540: 0D 2C 01 8B 20 28 53 AB 4B 29 AA 4E 31 28 4A 29 |.,.. (S.K).N1(J)|
00000550: B2 30 20 A7 20 33 33 30 00 62 0D 36 01 99 22 20 |.0 . 330.b.6.." |
00000560: 22 3B 00 6A 0D 40 01 82 20 4B 00 7D 0D 4A 01 99 |";.j.@.. K.}.J..|
00000570: 20 4E 31 28 4A 29 3B A3 4A AC 38 29 3B 00 85 0D | N1(J);.J.8);...|
00000580: 54 01 82 20 4A 00 8B 0D 5E 01 99 00 99 0D 68 01 |T.. J...^.....h.|
00000590: 81 20 4A B2 20 31 A4 20 35 00 A4 0D 72 01 99 20 |. J. 1. 5...r.. |
000005A0: 22 58 22 3B 00 B0 0D 7C 01 81 20 4B B2 31 A4 53 |"X";...|.. K.1.S|
000005B0: 00 CC 0D 86 01 8B 20 4E 32 28 4A 29 B1 B2 31 30 |...... N2(J)..10|
000005C0: AE 28 53 AB 4B 29 20 A7 20 34 33 30 00 E6 0D 90 |.(S.K) . 430....|
000005D0: 01 8B 20 28 53 AB 4B 29 AA 4E 32 28 4A 29 B2 30 |.. (S.K).N2(J).0|
000005E0: 20 A7 20 34 33 30 00 F1 0D 9A 01 99 20 22 20 22 | . 430...... " "|
000005F0: 3B 00 F9 0D A4 01 82 20 4B 00 0C 0E AE 01 99 20 |;...... K...... |
00000600: 4E 32 28 4A 29 3B A3 4A AC 38 29 3B 00 14 0E B8 |N2(J);.J.8);....|
00000610: 01 82 20 4A 00 1A 0E C2 01 99 00 27 0E CC 01 81 |.. J.......'....|
00000620: 20 4A B2 31 A4 20 35 00 38 0E D6 01 81 20 4B B2 | J.1. 5.8.... K.|
00000630: 20 31 20 A4 20 53 AA 33 00 43 0E E0 01 99 20 22 | 1 . S.3.C.... "|
00000640: 2D 22 3B 00 4B 0E EA 01 82 20 4B 00 57 0E F4 01 |-";.K.... K.W...|
00000650: 99 20 A3 4A AC 38 29 00 5F 0E FE 01 82 20 4A 00 |. .J.8)._.... J.|
00000660: 6B 0E 08 02 81 20 4A B2 31 A4 35 00 71 0E 12 02 |k.... J.1.5.q...|
00000670: 99 00 79 0E 1C 02 82 20 4A 00 A9 0E 26 02 99 22 |..y.... J...&.."|
00000680: 45 4E 54 45 52 20 54 48 45 20 41 4E 53 57 45 52 |ENTER THE ANSWER|
00000690: 53 2C 28 57 49 54 48 20 41 20 43 4F 4D 4D 41 20 |S,(WITH A COMMA |
000006A0: 42 45 54 57 45 45 4E 29 22 00 C8 0E 30 02 85 20 |BETWEEN)"...0.. |
000006B0: 41 28 31 29 2C 41 28 32 29 2C 41 28 33 29 2C 41 |A(1),A(2),A(3),A|
000006C0: 28 34 29 2C 41 28 35 29 00 CE 0E 3A 02 8F 00 F5 |(4),A(5)...:....|
000006D0: 0E 3B 02 8F 20 2A 2A 2A 2A 2A 20 50 52 49 4E 54 |.;.. ***** PRINT|
000006E0: 53 20 47 4F 52 55 50 20 52 45 53 55 4C 54 53 20 |S GORUP RESULTS |
000006F0: 2A 2A 2A 2A 2A 00 0A 0F 44 02 81 20 58 B2 31 A4 |*****...D.. X.1.|
00000700: 35 30 30 3A 82 3A 99 22 93 22 00 29 0F 4E 02 99 |500:.:.".".).N..|
00000710: 20 22 52 45 53 55 4C 54 53 20 4F 46 20 54 48 49 | "RESULTS OF THI|
00000720: 53 20 47 52 4F 55 50 3A 22 00 2F 0F 58 02 99 00 |S GROUP:"./.X...|
00000730: 5D 0F 62 02 99 22 49 54 45 4D 22 3B A3 37 29 3B |].b.."ITEM";.7);|
00000740: 22 4D 49 4E 45 22 A3 31 34 29 22 59 4F 55 52 53 |"MINE".14)"YOURS|
00000750: 22 A3 32 32 29 22 52 45 53 55 4C 54 22 00 81 0F |".22)"RESULT"...|
00000760: 6C 02 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |l.."------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000780: 22 00 8D 0F 76 02 81 20 4A B2 31 A4 35 00 A2 0F |"...v.. J.1.5...|
00000790: 80 02 43 28 4A 29 B2 4E 31 28 4A 29 AC 4E 32 28 |..C(J).N1(J).N2(|
000007A0: 4A 29 00 BA 0F 8A 02 8B 20 43 28 4A 29 B3 B1 20 |J)...... C(J).. |
000007B0: 41 28 4A 29 20 A7 20 36 39 30 00 CE 0F 94 02 52 |A(J) . 690.....R|
000007C0: 24 28 4A 29 B2 22 43 4F 52 52 45 43 54 22 00 DB |$(J)."CORRECT"..|
000007D0: 0F 9E 02 43 4F B2 43 4F 20 AA 31 00 E5 0F A8 02 |...CO.CO .1.....|
000007E0: 89 20 37 31 30 00 FB 0F B2 02 52 24 28 4A 29 B2 |. 710.....R$(J).|
000007F0: 22 1C 2A 57 52 4F 4E 47 2A 90 22 00 07 10 BC 02 |".*WRONG*.".....|
00000800: 57 4F B2 57 4F AA 31 00 2B 10 C6 02 99 20 4A 3B |WO.WO.1.+.... J;|
00000810: 22 2E 22 A3 35 29 43 28 4A 29 A3 31 34 29 41 28 |".".5)C(J).14)A(|
00000820: 4A 29 A3 32 32 29 52 24 28 4A 29 00 33 10 D0 02 |J).22)R$(J).3...|
00000830: 82 20 4A 00 39 10 DA 02 99 00 3F 10 E4 02 99 00 |. J.9.....?.....|
00000840: 47 10 EE 02 82 20 49 00 4D 10 F8 02 8F 00 73 10 |G.... I.M.....s.|
00000850: F9 02 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 54 |... ** PROGRAM T|
00000860: 45 52 4D 49 4E 41 54 49 4F 4E 20 50 4F 49 4E 54 |ERMINATION POINT|
00000870: 20 2A 2A 00 89 10 02 03 81 20 58 B2 31 A4 35 30 | **...... X.1.50|
00000880: 30 30 3A 82 3A 99 22 93 22 00 A8 10 0C 03 99 20 |00:.:."."...... |
00000890: 22 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |"...............|
000008A0: A6 A6 A6 A6 A6 A6 A6 22 00 C7 10 0D 03 99 20 22 |......."...... "|
000008B0: A6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000008C0: 20 20 20 20 20 A6 22 00 E6 10 16 03 99 20 22 A6 | ."...... ".|
000008D0: 20 20 20 20 53 43 4F 52 45 20 42 4F 41 52 44 20 | SCORE BOARD |
000008E0: 20 20 20 20 A6 22 00 05 11 17 03 99 20 22 A6 20 | ."...... ". |
000008F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000900: 20 20 20 A6 22 00 24 11 20 03 99 20 22 A6 A6 A6 | .".$. .. "...|
00000910: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000920: A6 A6 A6 22 00 41 11 2A 03 99 3A 99 22 51 55 45 |...".A.*..:."QUE|
00000930: 53 54 49 4F 4E 53 20 22 A3 31 35 29 43 4F AA 57 |STIONS ".15)CO.W|
00000940: 4F 00 47 11 34 03 99 00 64 11 3E 03 99 20 22 4E |O.G.4...d.>.. "N|
00000950: 55 4D 42 45 52 20 43 4F 52 52 45 43 54 22 A3 32 |UMBER CORRECT".2|
00000960: 30 29 43 4F 00 81 11 48 03 99 20 22 4E 55 4D 42 |0)CO...H.. "NUMB|
00000970: 45 52 20 2A 57 52 4F 4E 47 2A 22 A3 32 30 29 57 |ER *WRONG*".20)W|
00000980: 4F 00 87 11 52 03 99 00 B5 11 5C 03 99 20 22 59 |O...R.....\.. "Y|
00000990: 4F 55 52 20 53 43 4F 52 45 20 49 53 20 12 1F 22 |OUR SCORE IS .."|
000009A0: 3B 28 43 4F AD 28 43 4F AA 57 4F 29 29 AC 31 30 |;(CO.(CO.WO)).10|
000009B0: 30 3B 22 25 22 00 BE 11 5D 03 99 22 90 22 00 DE |0;"%"...].."."..|
000009C0: 11 66 03 99 20 22 DC DC DC DC DC DC DC DC DC DC |.f.. "..........|
000009D0: DC DC DC DC DC DC DC DC DC DC DC DC DC 22 00 E4 |............."..|
000009E0: 11 70 03 99 00 08 12 7A 03 99 22 44 4F 20 59 4F |.p.....z.."DO YO|
000009F0: 55 20 57 41 4E 4E 41 20 50 4C 41 59 20 41 47 41 |U WANNA PLAY AGA|
00000A00: 49 4E 20 28 59 2F 4E 29 00 20 12 84 03 85 20 44 |IN (Y/N). .... D|
00000A10: 24 3A 8B 20 44 24 B2 22 59 22 A7 20 8A 20 31 34 |$:. D$."Y". . 14|
00000A20: 00 4A 12 8E 03 8B 20 44 24 B2 22 4E 22 A7 20 99 |.J.... D$."N". .|
00000A30: 22 93 20 54 48 41 4E 4B 20 59 4F 55 2E 20 20 47 |". THANK YOU. G|
00000A40: 4F 4F 44 42 59 45 21 22 3A 80 00 68 12 98 03 8B |OODBYE!":..h....|
00000A50: 20 44 24 B3 B1 22 4E 22 20 AF 20 44 24 B3 B1 22 | D$.."N" . D$.."|
00000A60: 59 22 20 A7 20 37 37 30 00 6E 12 E8 03 8F 00 74 |Y" . 770.n.....t|
00000A70: 12 F2 03 8F 00 7A 12 F7 03 8F 00 9C 12 FC 03 8F |.....z..........|
00000A80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A90: 20 20 20 20 44 49 56 49 53 49 4F 4E 00 A2 12 06 | DIVISION....|
00000AA0: 04 8F 00 C5 12 10 04 8F 20 2A 2A 4E 4F 54 45 2A |........ **NOTE*|
00000AB0: 2A 20 49 4E 44 49 56 49 44 55 45 41 4C 20 4D 41 |* INDIVIDUEAL MA|
00000AC0: 43 48 49 4E 45 00 EB 12 11 04 8F 20 44 49 46 46 |CHINE...... DIFF|
00000AD0: 45 52 45 4E 43 45 53 20 49 4E 20 48 41 4E 44 4C |ERENCES IN HANDL|
00000AE0: 49 4E 47 20 4D 55 4D 45 52 49 43 00 10 13 12 04 |ING MUMERIC.....|
00000AF0: 8F 20 49 54 45 4D 53 20 4D 41 59 20 43 41 55 53 |. ITEMS MAY CAUS|
00000B00: 45 20 49 4E 43 4F 52 52 45 43 54 20 41 4E 53 2D |E INCORRECT ANS-|
00000B10: 00 36 13 13 04 8F 20 57 45 52 53 20 41 4E 41 4C |.6.... WERS ANAL|
00000B20: 59 53 49 53 20 57 48 45 4E 20 44 45 41 4C 49 4E |YSIS WHEN DEALIN|
00000B30: 47 20 57 49 54 48 00 5C 13 14 04 8F 20 4C 41 52 |G WITH.\.... LAR|
00000B40: 47 45 20 41 4E 53 57 45 52 53 20 57 49 54 48 20 |GE ANSWERS WITH |
00000B50: 45 58 54 45 4E 44 45 44 20 44 45 2D 00 73 13 15 |EXTENDED DE-.s..|
00000B60: 04 8F 20 43 49 4D 41 4C 20 50 4F 53 49 54 49 4F |.. CIMAL POSITIO|
00000B70: 4E 53 2E 00 93 13 24 04 97 20 35 33 32 38 31 2C |NS....$.. 53281,|
00000B80: 31 36 3A 97 20 35 33 32 38 30 2C 31 36 3A 99 22 |16:. 53280,16:."|
00000B90: 93 9E 22 00 B5 13 42 04 8F 20 2A 2A 2A 20 44 41 |.."...B.. *** DA|
00000BA0: 54 41 20 49 4E 49 54 49 41 4C 49 5A 41 54 49 4F |TA INITIALIZATIO|
00000BB0: 4E 20 2A 2A 2A 00 BD 13 4C 04 59 B2 31 00 C5 13 |N ***...L.Y.1...|
00000BC0: 56 04 53 B2 31 00 CE 13 60 04 4D B2 35 30 00 D7 |V.S.1...`.M.50..|
00000BD0: 13 6A 04 43 4F B2 30 00 E0 13 74 04 57 4F B2 30 |.j.CO.0...t.WO.0|
00000BE0: 00 EC 13 7E 04 86 20 52 24 28 35 29 00 F7 13 88 |...~.. R$(5)....|
00000BF0: 04 86 20 41 28 35 29 00 03 14 92 04 86 20 4E 31 |.. A(5)...... N1|
00000C00: 28 35 29 00 0F 14 9C 04 86 20 4E 32 28 35 29 00 |(5)...... N2(5).|
00000C10: 1A 14 A6 04 86 20 43 28 35 29 00 56 14 B0 04 99 |..... C(5).V....|
00000C20: 22 45 4E 54 45 52 20 54 48 45 20 4E 55 4D 42 45 |"ENTER THE NUMBE|
00000C30: 52 20 4F 46 20 44 49 47 49 54 53 20 46 4F 52 20 |R OF DIGITS FOR |
00000C40: 54 48 45 20 50 52 41 43 2D 54 49 43 45 20 44 49 |THE PRAC-TICE DI|
00000C50: 56 49 53 4F 52 22 00 5E 14 BA 04 85 20 53 00 9B |VISOR".^.... S..|
00000C60: 14 C4 04 99 22 45 4E 54 45 52 20 54 48 45 20 4E |...."ENTER THE N|
00000C70: 55 4D 42 45 52 20 4F 46 20 44 49 47 49 54 53 20 |UMBER OF DIGITS |
00000C80: 46 4F 52 20 54 48 45 20 50 52 41 43 2D 54 49 43 |FOR THE PRAC-TIC|
00000C90: 45 20 44 49 56 49 44 45 4E 44 22 00 A4 14 CE 04 |E DIVIDEND".....|
00000CA0: 85 20 53 32 00 E2 14 D8 04 99 22 45 4E 54 45 52 |. S2......"ENTER|
00000CB0: 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 44 | THE NUMBER OF D|
00000CC0: 45 43 49 4D 41 4C 20 50 4F 53 49 54 49 4F 4E 53 |ECIMAL POSITIONS|
00000CD0: 20 20 20 46 4F 52 20 54 48 45 20 52 45 53 55 4C | FOR THE RESUL|
00000CE0: 54 22 00 EB 14 E2 04 85 20 53 33 00 28 15 EC 04 |T"...... S3.(...|
00000CF0: 99 22 48 4F 57 20 4D 41 4E 59 20 49 54 45 4D 53 |."HOW MANY ITEMS|
00000D00: 20 53 48 41 4C 4C 20 49 20 50 52 49 4E 54 20 28 | SHALL I PRINT (|
00000D10: 35 2C 31 30 2C 31 35 2C 20 20 32 30 2C 20 45 54 |5,10,15, 20, ET|
00000D20: 43 2E 2E 2E 2E 2E 29 22 00 30 15 F6 04 85 20 4D |C.....)".0.... M|
00000D30: 00 39 15 00 05 99 22 93 22 00 5F 15 14 05 8F 20 |.9...."."._.... |
00000D40: 2A 2A 2A 2A 2A 2A 2A 20 50 52 4F 43 45 53 53 49 |******* PROCESSI|
00000D50: 4E 47 20 41 52 45 41 20 2A 2A 2A 2A 2A 2A 2A 00 |NG AREA *******.|
00000D60: 74 15 1E 05 81 20 49 B2 31 20 A4 20 4D AD 35 3A |t.... I.1 . M.5:|
00000D70: 99 22 93 22 00 81 15 28 05 81 20 4A B2 31 A4 20 |."."...(.. J.1. |
00000D80: 35 00 98 15 32 05 4E 31 28 4A 29 B2 B5 28 BB 28 |5...2.N1(J)..(.(|
00000D90: 59 29 AC 31 30 AE 53 29 00 AC 15 3C 05 8B 20 4E |Y).10.S)...<.. N|
00000DA0: 31 28 4A 29 B2 30 20 A7 31 33 33 30 00 C4 15 46 |1(J).0 .1330...F|
00000DB0: 05 4E 32 28 4A 29 B2 B5 28 BB 28 59 29 AC 31 30 |.N2(J)..(.(Y).10|
00000DC0: AE 53 32 29 00 D7 15 4B 05 8B 20 4E 32 28 4A 29 |.S2)...K.. N2(J)|
00000DD0: B2 30 A7 31 33 35 30 00 DF 15 50 05 82 20 4A 00 |.0.1350...P.. J.|
00000DE0: ED 15 5A 05 81 20 4A B2 20 31 A4 20 35 00 FE 15 |..Z.. J. 1. 5...|
00000DF0: 64 05 99 22 2D 2D 2D 2D 2D 2D 2D 2D 22 3B 00 06 |d.."--------";..|
00000E00: 16 6E 05 82 20 4A 00 0C 16 78 05 99 00 1A 16 82 |.n.. J...x......|
00000E10: 05 81 20 4A B2 20 31 A4 20 35 00 25 16 8B 05 4B |.. J. 1. 5.%...K|
00000E20: B2 53 AA 31 30 00 39 16 8C 05 99 20 4E 31 28 4A |.S.10.9.... N1(J|
00000E30: 29 22 2F 22 4E 32 28 4A 29 00 6B 16 8D 05 99 3A |)"/"N2(J).k....:|
00000E40: 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |."==============|
00000E50: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000E60: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 73 16 96 05 |==========".s...|
00000E70: 82 20 4A 00 A3 16 D2 05 99 22 45 4E 54 45 52 20 |. J......"ENTER |
00000E80: 54 48 45 20 41 4E 53 57 45 52 53 2C 28 57 49 54 |THE ANSWERS,(WIT|
00000E90: 48 20 41 20 43 4F 4D 4D 41 20 42 45 54 57 45 45 |H A COMMA BETWEE|
00000EA0: 4E 29 22 00 C2 16 DC 05 85 20 41 28 31 29 2C 41 |N)"...... A(1),A|
00000EB0: 28 32 29 2C 41 28 33 29 2C 41 28 34 29 2C 41 28 |(2),A(3),A(4),A(|
00000EC0: 35 29 00 CB 16 E1 05 99 22 93 22 00 F0 16 E6 05 |5)......".".....|
00000ED0: 8F 20 2A 2A 2A 2A 20 50 52 49 4E 54 53 20 47 52 |. **** PRINTS GR|
00000EE0: 4F 55 50 20 52 45 53 55 4C 54 53 20 2A 2A 2A 2A |OUP RESULTS ****|
00000EF0: 00 F6 16 F0 05 99 00 15 17 FA 05 99 20 22 52 45 |............ "RE|
00000F00: 53 55 4C 54 53 20 4F 46 20 54 48 49 53 20 47 52 |SULTS OF THIS GR|
00000F10: 4F 55 50 3A 22 00 1B 17 04 06 99 00 49 17 0E 06 |OUP:".......I...|
00000F20: 99 22 49 54 45 4D 22 3B A3 37 29 3B 22 4D 49 4E |."ITEM";.7);"MIN|
00000F30: 45 22 A3 31 34 29 22 59 4F 55 52 53 22 A3 32 32 |E".14)"YOURS".22|
00000F40: 29 22 52 45 53 55 4C 54 22 00 6D 17 18 06 99 22 |)"RESULT".m...."|
00000F50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000F60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 79 17 |------------".y.|
00000F70: 22 06 81 20 4A B2 31 A4 35 00 8E 17 2C 06 8B 20 |".. J.1.5...,.. |
00000F80: 4E 31 28 4A 29 B2 30 20 A7 20 31 36 35 30 00 A3 |N1(J).0 . 1650..|
00000F90: 17 36 06 43 28 4A 29 B2 4E 31 28 4A 29 AD 4E 32 |.6.C(J).N1(J).N2|
00000FA0: 28 4A 29 00 BC 17 40 06 43 31 B2 B5 28 43 28 4A |(J)...@.C1..(C(J|
00000FB0: 29 AC 31 30 AE 28 53 33 AA 31 29 29 00 D1 17 4A |).10.(S3.1))...J|
00000FC0: 06 43 32 B2 B5 28 43 28 4A 29 AC 31 30 AE 53 33 |.C2..(C(J).10.S3|
00000FD0: 29 00 EC 17 54 06 8B 20 28 43 31 AB 28 43 32 AC |)...T.. (C1.(C2.|
00000FE0: 31 30 29 29 B3 35 20 A7 31 36 34 30 00 F8 17 5E |10)).5 .1640...^|
00000FF0: 06 43 32 B2 43 32 AA 31 00 0C 18 68 06 43 32 B2 |.C2.C2.1...h.C2.|
00001000: 28 43 32 AD 28 31 30 AE 53 33 29 29 00 30 18 72 |(C2.(10.S3)).0.r|
00001010: 06 8B 20 43 32 AB 41 28 4A 29 20 B1 28 31 AD 31 |.. C2.A(J) .(1.1|
00001020: 30 AE 28 53 33 AA 31 29 29 20 A7 20 31 37 30 30 |0.(S3.1)) . 1700|
00001030: 00 55 18 7C 06 8B 20 43 32 AB 41 28 4A 29 20 B3 |.U.|.. C2.A(J) .|
00001040: 28 AB 31 AD 31 30 AE 28 53 33 AA 31 29 29 20 A7 |(.1.10.(S3.1)) .|
00001050: 20 31 37 30 30 00 69 18 86 06 52 24 28 4A 29 B2 | 1700.i...R$(J).|
00001060: 22 43 4F 52 52 45 43 54 22 00 75 18 90 06 43 4F |"CORRECT".u...CO|
00001070: B2 43 4F AA 31 00 80 18 9A 06 89 20 31 37 32 30 |.CO.1...... 1720|
00001080: 00 96 18 A4 06 52 24 28 4A 29 B2 22 1C 2A 57 52 |.....R$(J).".*WR|
00001090: 4F 4E 47 2A 9E 22 00 A2 18 AE 06 57 4F B2 57 4F |ONG*.".....WO.WO|
000010A0: AA 31 00 C4 18 B8 06 99 20 4A 3B 22 2E 22 A3 35 |.1...... J;".".5|
000010B0: 29 43 32 A3 31 34 29 41 28 4A 29 A3 32 32 29 52 |)C2.14)A(J).22)R|
000010C0: 24 28 4A 29 00 CD 18 C2 06 43 32 B2 30 00 D5 18 |$(J).....C2.0...|
000010D0: CC 06 82 20 4A 00 DB 18 D6 06 99 00 E1 18 E0 06 |... J...........|
000010E0: 99 00 E9 18 EA 06 82 20 49 00 FB 18 EF 06 81 20 |....... I...... |
000010F0: 58 B2 31 A4 35 30 30 30 3A 82 58 00 21 19 F4 06 |X.1.5000:.X.!...|
00001100: 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 54 45 52 |. ** PROGRAM TER|
00001110: 4D 49 4E 41 54 49 4F 4E 20 50 4F 49 4E 54 20 2A |MINATION POINT *|
00001120: 2A 00 27 19 FE 06 99 00 30 19 03 07 99 22 93 22 |*.'.....0...."."|
00001130: 00 4D 19 08 07 99 22 A6 A6 A6 A6 A6 A6 A6 A6 A6 |.M....".........|
00001140: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 22 00 6A 19 |............".j.|
00001150: 0D 07 99 22 A6 20 20 20 20 20 20 20 20 20 20 20 |...". |
00001160: 20 20 20 20 20 20 20 20 A6 22 00 87 19 12 07 99 | ."......|
00001170: 22 A6 20 20 20 20 53 43 4F 52 45 20 42 4F 41 52 |". SCORE BOAR|
00001180: 44 20 20 20 20 A6 22 00 A4 19 17 07 99 22 A6 20 |D ."......". |
00001190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000011A0: 20 20 A6 22 00 C1 19 1C 07 99 22 A6 A6 A6 A6 A6 | ."......".....|
000011B0: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
000011C0: 22 00 C9 19 21 07 99 3A 99 00 E4 19 26 07 99 22 |"...!..:....&.."|
000011D0: 51 55 45 53 54 49 4F 4E 53 20 22 A3 31 35 29 43 |QUESTIONS ".15)C|
000011E0: 4F AA 57 4F 00 EA 19 30 07 99 00 06 1A 3A 07 99 |O.WO...0.....:..|
000011F0: 22 4E 55 4D 42 45 52 20 43 4F 52 52 45 43 54 22 |"NUMBER CORRECT"|
00001200: A3 32 30 29 43 4F 00 22 1A 44 07 99 22 4E 55 4D |.20)CO.".D.."NUM|
00001210: 42 45 52 20 2A 57 52 4F 4E 47 2A 22 A3 32 30 29 |BER *WRONG*".20)|
00001220: 57 4F 00 28 1A 4E 07 99 00 54 1A 58 07 99 22 59 |WO.(.N...T.X.."Y|
00001230: 4F 55 52 20 53 43 4F 52 45 20 49 53 20 12 1E 22 |OUR SCORE IS .."|
00001240: 28 43 4F AD 28 43 4F AA 57 4F 29 29 AC 31 30 30 |(CO.(CO.WO)).100|
00001250: 3B 22 25 22 00 75 1A 62 07 99 3A 99 3A 99 22 DC |;"%".u.b..:.:.".|
00001260: DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC |................|
00001270: DC DC DC DC 22 00 7B 1A 6C 07 99 00 A5 1A 76 07 |....".{.l.....v.|
00001280: 99 22 44 4F 20 59 4F 55 20 57 41 4E 4E 41 20 50 |."DO YOU WANNA P|
00001290: 4C 41 59 20 41 47 41 49 4E 20 28 59 2F 4E 29 22 |LAY AGAIN (Y/N)"|
000012A0: 3A 85 20 45 24 00 B5 1A 80 07 8B 20 45 24 B2 22 |:. E$...... E$."|
000012B0: 59 22 A7 20 8A 00 DE 1A 8A 07 8B 20 45 24 B2 22 |Y". ....... E$."|
000012C0: 4E 22 A7 20 99 22 93 54 48 41 4E 4B 20 59 4F 55 |N". .".THANK YOU|
000012D0: 2E 20 47 4F 4F 44 42 59 45 21 21 22 3A 80 00 FD |. GOODBYE!!":...|
000012E0: 1A 94 07 8B 20 45 24 B3 B1 22 59 22 20 AF 20 45 |.... E$.."Y" . E|
000012F0: 24 B3 B1 22 4E 22 20 A7 20 31 37 39 35 00 1F 1B |$.."N" . 1795...|
00001300: D0 07 99 22 93 22 3A 97 20 35 33 32 38 31 2C 38 |...".":. 53281,8|
00001310: 3A 97 20 35 33 32 38 30 2C 38 3A 99 22 90 22 00 |:. 53280,8:.".".|
00001320: 25 1B DA 07 8F 00 4A 1B E4 07 8F 20 20 20 20 20 |%.....J.... |
00001330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 | SU|
00001340: 42 53 54 52 41 43 54 49 4F 4E 00 6E 1B EE 07 8F |BSTRACTION.n....|
00001350: 20 2A 2A 2A 2A 20 44 41 54 41 20 49 4E 49 54 49 | **** DATA INITI|
00001360: 41 4C 49 5A 41 54 49 4F 4E 20 2A 2A 2A 2A 00 76 |ALIZATION ****.v|
00001370: 1B F8 07 59 B2 31 00 7E 1B 02 08 53 B2 31 00 87 |...Y.1.~...S.1..|
00001380: 1B 0C 08 4D B2 35 30 00 90 1B 16 08 43 4F B2 30 |...M.50.....CO.0|
00001390: 00 99 1B 20 08 57 4F B2 30 00 A5 1B 2A 08 86 20 |... .WO.0...*.. |
000013A0: 52 24 28 35 29 00 B1 1B 34 08 86 20 4E 31 28 35 |R$(5)...4.. N1(5|
000013B0: 29 00 BD 1B 3E 08 86 20 4E 32 28 35 29 00 C8 1B |)...>.. N2(5)...|
000013C0: 48 08 86 20 43 28 35 29 00 D3 1B 52 08 86 20 41 |H.. C(5)...R.. A|
000013D0: 28 35 29 00 19 1C 5C 08 99 20 22 45 4E 54 45 52 |(5)...\.. "ENTER|
000013E0: 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 44 | THE NUMBER OF D|
000013F0: 49 47 49 54 53 20 46 4F 52 20 54 48 45 20 50 52 |IGITS FOR THE PR|
00001400: 41 43 2D 54 49 43 45 20 4E 55 4D 42 45 52 53 20 |AC-TICE NUMBERS |
00001410: 28 4D 41 58 2E 20 34 29 22 00 21 1C 66 08 85 20 |(MAX. 4)".!.f.. |
00001420: 53 00 5D 1C 70 08 99 22 48 4F 57 20 4D 41 4E 59 |S.].p.."HOW MANY|
00001430: 20 49 54 45 4D 53 20 53 48 41 4C 4C 20 49 20 50 | ITEMS SHALL I P|
00001440: 52 49 4E 54 20 28 35 2C 20 31 30 2C 20 31 35 2C |RINT (5, 10, 15,|
00001450: 32 30 2C 20 45 54 43 2E 2E 2E 2E 29 22 00 65 1C |20, ETC....)".e.|
00001460: 7A 08 85 20 4D 00 6D 1C 84 08 99 3A 99 00 92 1C |z.. M.m....:....|
00001470: 98 08 8F 20 2A 2A 2A 2A 2A 2A 20 50 52 4F 43 45 |... ****** PROCE|
00001480: 53 53 49 4E 47 20 41 52 45 41 20 2A 2A 2A 2A 2A |SSING AREA *****|
00001490: 2A 2A 00 A0 1C A2 08 81 20 49 B2 31 A4 4D AD 35 |**...... I.1.M.5|
000014A0: 00 AC 1C AC 08 81 20 4A B2 31 A4 35 00 C3 1C B6 |...... J.1.5....|
000014B0: 08 4E 31 28 4A 29 B2 B5 28 BB 28 59 29 AC 31 30 |.N1(J)..(.(Y).10|
000014C0: AE 53 29 00 DA 1C C0 08 4E 32 28 4A 29 B2 B5 28 |.S).....N2(J)..(|
000014D0: BB 28 59 29 AC 31 30 AE 53 29 00 E2 1C CA 08 82 |.(Y).10.S)......|
000014E0: 20 4A 00 F0 1C D4 08 81 20 4A B2 31 20 A4 20 35 | J...... J.1 . 5|
000014F0: 00 FB 1C DE 08 99 20 22 20 22 3B 00 07 1D E8 08 |...... " ";.....|
00001500: 81 20 4B B2 31 A4 53 00 24 1D F2 08 8B 20 4E 31 |. K.1.S.$.... N1|
00001510: 28 4A 29 B1 B2 31 30 AE 28 53 AB 4B 29 20 A7 20 |(J)..10.(S.K) . |
00001520: 32 33 33 30 00 3F 1D FC 08 8B 20 28 53 AB 4B 29 |2330.?.... (S.K)|
00001530: AA 4E 31 28 4A 29 B2 30 20 A7 20 32 33 33 30 00 |.N1(J).0 . 2330.|
00001540: 49 1D 06 09 99 22 20 22 3B 00 51 1D 10 09 82 20 |I...." ";.Q.... |
00001550: 4B 00 64 1D 1A 09 99 20 4E 31 28 4A 29 3B A3 4A |K.d.... N1(J);.J|
00001560: AC 38 29 3B 00 6C 1D 24 09 82 20 4A 00 72 1D 2E |.8);.l.$.. J.r..|
00001570: 09 99 00 7E 1D 38 09 81 20 4A B2 31 A4 35 00 88 |...~.8.. J.1.5..|
00001580: 1D 42 09 99 22 2D 22 3B 00 95 1D 4C 09 81 20 4B |.B.."-";...L.. K|
00001590: B2 31 A4 20 53 00 B2 1D 56 09 8B 20 4E 32 28 4A |.1. S...V.. N2(J|
000015A0: 29 B1 B2 31 30 AE 28 53 AB 4B 29 20 A7 20 32 34 |)..10.(S.K) . 24|
000015B0: 33 30 00 CD 1D 60 09 8B 20 28 53 AB 4B 29 AA 4E |30...`.. (S.K).N|
000015C0: 32 28 4A 29 B2 30 20 A7 20 32 34 33 30 00 D7 1D |2(J).0 . 2430...|
000015D0: 6A 09 99 22 20 22 3B 00 DF 1D 74 09 82 20 4B 00 |j.." ";...t.. K.|
000015E0: F2 1D 7E 09 99 20 4E 32 28 4A 29 3B A3 4A AC 38 |..~.. N2(J);.J.8|
000015F0: 29 3B 00 FA 1D 88 09 82 20 4A 00 00 1E 92 09 99 |);...... J......|
00001600: 00 0D 1E 9C 09 81 20 4A B2 20 31 A4 35 00 1C 1E |...... J. 1.5...|
00001610: A6 09 81 4B B2 31 20 A4 20 53 AA 33 00 27 1E B0 |...K.1 . S.3.'..|
00001620: 09 99 20 22 2D 22 3B 00 2F 1E BA 09 82 20 4B 00 |.. "-";./.... K.|
00001630: 3B 1E C4 09 99 20 A3 4A AC 38 29 00 43 1E CE 09 |;.... .J.8).C...|
00001640: 82 20 4A 00 50 1E D8 09 81 20 4A B2 31 A4 20 35 |. J.P.... J.1. 5|
00001650: 00 56 1E E2 09 99 00 5E 1E EC 09 82 20 4A 00 8E |.V.....^.... J..|
00001660: 1E F6 09 99 22 45 4E 54 45 52 20 54 48 45 20 41 |...."ENTER THE A|
00001670: 4E 53 57 45 52 53 2C 28 57 49 54 48 20 41 20 43 |NSWERS,(WITH A C|
00001680: 4F 4D 4D 41 20 42 45 54 57 45 45 4E 29 22 00 AD |OMMA BETWEEN)"..|
00001690: 1E 00 0A 85 20 41 28 31 29 2C 41 28 32 29 2C 41 |.... A(1),A(2),A|
000016A0: 28 33 29 2C 41 28 34 29 2C 41 28 35 29 00 B6 1E |(3),A(4),A(5)...|
000016B0: 05 0A 99 22 93 22 00 DA 1E 0A 0A 8F 20 2A 2A 2A |..."."...... ***|
000016C0: 2A 20 50 52 49 4E 54 20 47 52 4F 55 50 20 52 45 |* PRINT GROUP RE|
000016D0: 53 55 4C 54 53 20 2A 2A 2A 2A 00 E0 1E 14 0A 99 |SULTS ****......|
000016E0: 00 FF 1E 1E 0A 99 20 22 52 45 53 55 4C 54 53 20 |...... "RESULTS |
000016F0: 4F 46 20 54 48 49 53 20 47 52 4F 55 50 3A 22 00 |OF THIS GROUP:".|
00001700: 05 1F 28 0A 99 00 33 1F 32 0A 99 22 49 54 45 4D |..(...3.2.."ITEM|
00001710: 22 3B A3 37 29 3B 22 4D 49 4E 45 22 A3 31 34 29 |";.7);"MINE".14)|
00001720: 22 59 4F 55 52 53 22 A3 32 32 29 22 52 45 53 55 |"YOURS".22)"RESU|
00001730: 4C 54 22 00 57 1F 3C 0A 99 22 2D 2D 2D 2D 2D 2D |LT".W.<.."------|
00001740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001750: 2D 2D 2D 2D 2D 2D 22 00 63 1F 46 0A 81 20 4A B2 |------".c.F.. J.|
00001760: 31 A4 35 00 78 1F 50 0A 43 28 4A 29 B2 4E 31 28 |1.5.x.P.C(J).N1(|
00001770: 4A 29 AB 4E 32 28 4A 29 00 91 1F 59 0A 8B 20 43 |J).N2(J)...Y.. C|
00001780: 28 4A 29 20 B2 20 41 28 4A 29 20 A7 20 32 36 36 |(J) . A(J) . 266|
00001790: 30 00 AA 1F 5A 0A 8B 20 43 28 4A 29 20 B3 B1 20 |0...Z.. C(J) .. |
000017A0: 41 28 4A 29 20 A7 32 36 39 30 00 BF 1F 64 0A 52 |A(J) .2690...d.R|
000017B0: 24 28 4A 29 B2 22 90 43 4F 52 52 45 43 54 22 00 |$(J).".CORRECT".|
000017C0: CB 1F 6E 0A 43 4F B2 43 4F AA 31 00 D5 1F 78 0A |..n.CO.CO.1...x.|
000017D0: 89 32 37 31 30 00 EB 1F 82 0A 52 24 28 4A 29 B2 |.2710.....R$(J).|
000017E0: 22 1C 2A 57 52 4F 4E 47 2A 90 22 00 F7 1F 8C 0A |".*WRONG*.".....|
000017F0: 57 4F B2 57 4F AA 31 00 1B 20 96 0A 99 20 4A 3B |WO.WO.1.. ... J;|
00001800: 22 2E 22 A3 35 29 43 28 4A 29 A3 31 34 29 41 28 |".".5)C(J).14)A(|
00001810: 4A 29 A3 32 32 29 52 24 28 4A 29 00 23 20 A0 0A |J).22)R$(J).# ..|
00001820: 82 20 4A 00 29 20 AA 0A 99 00 2F 20 B4 0A 99 00 |. J.) ..../ ....|
00001830: 37 20 BE 0A 82 20 49 00 4C 20 C3 0A 81 20 58 B2 |7 ... I.L ... X.|
00001840: 31 20 A4 20 35 30 30 30 3A 82 20 58 00 72 20 C8 |1 . 5000:. X.r .|
00001850: 0A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 54 45 |.. ** PROGRAM TE|
00001860: 52 4D 49 4E 41 54 49 4F 4E 20 50 4F 49 4E 54 20 |RMINATION POINT |
00001870: 2A 2A 00 78 20 D2 0A 99 00 81 20 D7 0A 99 22 93 |**.x ..... ...".|
00001880: 22 00 9E 20 DC 0A 99 22 A6 A6 A6 A6 A6 A6 A6 A6 |".. ..."........|
00001890: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 22 00 BB |............."..|
000018A0: 20 DD 0A 99 22 A6 20 20 20 20 20 20 20 20 20 20 | ...". |
000018B0: 20 20 20 20 20 20 20 20 20 A6 22 00 D8 20 DE 0A | .".. ..|
000018C0: 99 22 A6 20 20 20 20 53 43 4F 52 45 20 42 4F 41 |.". SCORE BOA|
000018D0: 52 44 20 20 20 20 A6 22 00 F5 20 DF 0A 99 22 A6 |RD .".. ...".|
000018E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018F0: 20 20 20 A6 22 00 12 21 E0 0A 99 22 A6 A6 A6 A6 | ."..!..."....|
00001900: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00001910: A6 22 00 2F 21 FA 0A 99 3A 99 22 51 55 45 53 54 |."./!...:."QUEST|
00001920: 49 4F 4E 53 20 22 A3 31 35 29 43 4F AA 57 4F 00 |IONS ".15)CO.WO.|
00001930: 35 21 04 0B 99 00 53 21 0E 0B 99 20 22 4E 55 4D |5!....S!... "NUM|
00001940: 42 45 52 20 43 4F 52 52 45 43 54 20 22 A3 32 30 |BER CORRECT ".20|
00001950: 29 43 4F 00 6F 21 18 0B 99 22 4E 55 4D 42 45 52 |)CO.o!..."NUMBER|
00001960: 20 2A 57 52 4F 4E 47 2A 22 A3 32 30 29 57 4F 00 | *WRONG*".20)WO.|
00001970: 75 21 22 0B 99 00 A5 21 2C 0B 99 20 22 59 4F 55 |u!"....!,.. "YOU|
00001980: 52 20 53 43 4F 52 45 20 49 53 20 12 97 22 3B 28 |R SCORE IS ..";(|
00001990: 43 4F AD 28 43 4F AA 57 4F 29 29 AC 31 30 30 3B |CO.(CO.WO)).100;|
000019A0: 22 25 92 90 22 00 C3 21 36 0B 99 22 A8 A8 A8 A8 |"%.."..!6.."....|
000019B0: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 |................|
000019C0: A8 A8 22 00 C9 21 40 0B 99 00 EE 21 4A 0B 99 22 |.."..!@....!J.."|
000019D0: 44 4F 20 59 4F 55 20 57 41 4E 4E 41 20 50 4C 41 |DO YOU WANNA PLA|
000019E0: 59 20 41 47 41 49 4E 20 28 59 2F 4E 29 22 00 03 |Y AGAIN (Y/N)"..|
000019F0: 22 54 0B 85 20 45 24 3A 8B 20 45 24 B2 22 59 22 |"T.. E$:. E$."Y"|
00001A00: A7 20 8A 00 30 22 5E 0B 8B 20 45 24 B2 22 4E 22 |. ..0"^.. E$."N"|
00001A10: 20 A7 20 99 22 93 54 48 41 4E 4B 20 59 4F 55 2E | . .".THANK YOU.|
00001A20: 20 42 59 45 2C 20 42 59 45 20 21 21 21 22 3A 80 | BYE, BYE !!!":.|
00001A30: 00 4F 22 68 0B 8B 20 45 24 B3 B1 22 59 22 20 AF |.O"h.. E$.."Y" .|
00001A40: 20 45 24 B3 B1 22 4E 22 20 A7 20 32 37 37 35 00 | E$.."N" . 2775.|
00001A50: 6C 22 B8 0B 97 20 35 33 32 38 30 2C 39 3A 97 35 |l"... 53280,9:.5|
00001A60: 33 32 38 31 2C 39 3A 99 22 81 93 22 00 72 22 C2 |3281,9:."..".r".|
00001A70: 0B 8F 00 93 22 CC 0B 8F 20 20 20 20 20 20 20 20 |...."... |
00001A80: 20 20 20 20 20 20 20 20 20 20 20 41 44 44 49 54 | ADDIT|
00001A90: 49 4F 4E 00 B9 22 D6 0B 8F 20 2A 2A 2A 2A 2A 20 |ION.."... ***** |
00001AA0: 44 41 54 41 20 49 4E 49 54 49 41 4C 49 5A 41 54 |DATA INITIALIZAT|
00001AB0: 49 4F 4E 20 2A 2A 2A 2A 2A 00 C1 22 E0 0B 59 B2 |ION *****.."..Y.|
00001AC0: 31 00 C9 22 EA 0B 53 B2 31 00 D2 22 F4 0B 4D B2 |1.."..S.1.."..M.|
00001AD0: 35 30 00 DB 22 FE 0B 43 4F B2 30 00 E4 22 08 0C |50.."..CO.0.."..|
00001AE0: 57 4F B2 30 00 F0 22 12 0C 86 20 52 24 28 35 29 |WO.0.."... R$(5)|
00001AF0: 00 FB 22 1C 0C 86 20 41 28 35 29 00 07 23 26 0C |.."... A(5)..#&.|
00001B00: 86 20 4E 31 28 35 29 00 13 23 30 0C 86 20 4E 32 |. N1(5)..#0.. N2|
00001B10: 28 35 29 00 1E 23 3A 0C 86 20 43 28 35 29 00 64 |(5)..#:.. C(5).d|
00001B20: 23 44 0C 99 20 22 45 4E 54 45 52 20 54 48 45 20 |#D.. "ENTER THE |
00001B30: 4E 55 4D 42 45 52 20 4F 46 20 44 49 47 49 54 53 |NUMBER OF DIGITS|
00001B40: 20 46 4F 52 20 54 48 45 20 50 52 41 43 2D 54 49 | FOR THE PRAC-TI|
00001B50: 43 45 20 4E 55 4D 42 45 52 53 20 20 28 4D 41 58 |CE NUMBERS (MAX|
00001B60: 2E 20 34 29 00 6C 23 4E 0C 85 20 53 00 A8 23 58 |. 4).l#N.. S..#X|
00001B70: 0C 99 22 48 4F 57 20 4D 41 4E 59 20 49 54 45 4D |.."HOW MANY ITEM|
00001B80: 53 20 53 48 41 4C 4C 20 49 20 50 52 49 4E 54 20 |S SHALL I PRINT |
00001B90: 28 35 2C 20 31 30 2C 20 31 35 2C 32 30 2C 20 45 |(5, 10, 15,20, E|
00001BA0: 54 43 2E 2E 2E 2E 29 22 00 B0 23 62 0C 85 20 4D |TC....)"..#b.. M|
00001BB0: 00 B6 23 6C 0C 99 00 BC 23 76 0C 99 00 DE 23 80 |..#l....#v....#.|
00001BC0: 0C 8F 20 2A 2A 2A 2A 2A 20 50 52 4F 43 45 53 53 |.. ***** PROCESS|
00001BD0: 49 4E 47 20 41 52 45 41 20 2A 2A 2A 2A 2A 00 EE |ING AREA *****..|
00001BE0: 23 8A 0C 81 20 49 B2 31 20 A4 20 4D AD 35 00 FA |#... I.1 . M.5..|
00001BF0: 23 94 0C 81 20 4A B2 31 A4 35 00 11 24 9E 0C 4E |#... J.1.5..$..N|
00001C00: 31 28 4A 29 B2 B5 28 BB 28 59 29 AC 31 30 AE 53 |1(J)..(.(Y).10.S|
00001C10: 29 00 28 24 A8 0C 4E 32 28 4A 29 B2 B5 28 BB 28 |).($..N2(J)..(.(|
00001C20: 59 29 AC 31 30 AE 53 29 00 30 24 B2 0C 82 20 4A |Y).10.S).0$... J|
00001C30: 00 3C 24 BC 0C 81 20 4A B2 31 A4 35 00 47 24 C6 |.<$... J.1.5.G$.|
00001C40: 0C 99 20 22 20 22 3B 00 53 24 D0 0C 81 20 4B B2 |.. " ";.S$... K.|
00001C50: 31 A4 53 00 70 24 DA 0C 8B 20 4E 31 28 4A 29 B1 |1.S.p$... N1(J).|
00001C60: B2 31 30 AE 28 53 AB 4B 29 20 A7 20 33 33 33 30 |.10.(S.K) . 3330|
00001C70: 00 8B 24 E4 0C 8B 20 28 53 AB 4B 29 AA 4E 31 28 |..$... (S.K).N1(|
00001C80: 4A 29 B2 30 20 A7 20 33 33 33 30 00 96 24 EE 0C |J).0 . 3330..$..|
00001C90: 99 20 22 20 22 3B 00 9E 24 F8 0C 82 20 4B 00 B1 |. " ";..$... K..|
00001CA0: 24 02 0D 99 20 4E 31 28 4A 29 3B A3 4A AC 38 29 |$... N1(J);.J.8)|
00001CB0: 3B 00 B9 24 0C 0D 82 20 4A 00 BF 24 16 0D 99 00 |;..$... J..$....|
00001CC0: CB 24 20 0D 81 20 4A B2 31 A4 35 00 D6 24 2A 0D |.$ .. J.1.5..$*.|
00001CD0: 99 20 22 2B 22 3B 00 E4 24 34 0D 81 20 4B B2 31 |. "+";..$4.. K.1|
00001CE0: 20 A4 20 53 00 01 25 3E 0D 8B 20 4E 32 28 4A 29 | . S..%>.. N2(J)|
00001CF0: B1 B2 31 30 AE 28 53 AB 4B 29 20 A7 20 33 34 33 |..10.(S.K) . 343|
00001D00: 30 00 1B 25 48 0D 8B 20 28 53 AB 4B 29 AA 4E 32 |0..%H.. (S.K).N2|
00001D10: 28 4A 29 B2 30 A7 20 33 34 33 30 00 25 25 52 0D |(J).0. 3430.%%R.|
00001D20: 99 22 20 22 3B 00 2D 25 5C 0D 82 20 4B 00 40 25 |." ";.-%\.. K.@%|
00001D30: 66 0D 99 20 4E 32 28 4A 29 3B A3 4A AC 38 29 3B |f.. N2(J);.J.8);|
00001D40: 00 48 25 70 0D 82 20 4A 00 4E 25 7A 0D 99 00 5A |.H%p.. J.N%z...Z|
00001D50: 25 84 0D 81 20 4A B2 31 A4 35 00 68 25 8E 0D 81 |%... J.1.5.h%...|
00001D60: 20 4B B2 31 A4 53 AA 33 00 72 25 98 0D 99 22 2D | K.1.S.3.r%..."-|
00001D70: 22 3B 00 7A 25 A2 0D 82 20 4B 00 86 25 AC 0D 99 |";.z%... K..%...|
00001D80: 20 A3 4A AC 38 29 00 8E 25 B6 0D 82 20 4A 00 9A | .J.8)..%... J..|
00001D90: 25 C0 0D 81 20 4A B2 31 A4 35 00 A0 25 CA 0D 99 |%... J.1.5..%...|
00001DA0: 00 A8 25 D4 0D 82 20 4A 00 D8 25 DE 0D 99 22 45 |..%... J..%..."E|
00001DB0: 4E 54 45 52 20 54 48 45 20 41 4E 53 57 45 52 53 |NTER THE ANSWERS|
00001DC0: 2C 28 57 49 54 48 20 41 20 43 4F 4D 4D 41 20 42 |,(WITH A COMMA B|
00001DD0: 45 54 57 45 45 4E 29 22 00 F7 25 E8 0D 85 20 41 |ETWEEN)"..%... A|
00001DE0: 28 31 29 2C 41 28 32 29 2C 41 28 33 29 2C 41 28 |(1),A(2),A(3),A(|
00001DF0: 34 29 2C 41 28 35 29 00 00 26 ED 0D 99 22 93 22 |4),A(5)..&..."."|
00001E00: 00 25 26 F2 0D 8F 20 2A 2A 2A 2A 20 50 52 49 4E |.%&... **** PRIN|
00001E10: 54 53 20 47 52 4F 55 50 20 52 45 53 55 4C 54 53 |TS GROUP RESULTS|
00001E20: 20 2A 2A 2A 2A 00 2B 26 FC 0D 99 00 4A 26 06 0E | ****.+&....J&..|
00001E30: 99 20 22 52 45 53 55 4C 54 53 20 4F 46 20 54 48 |. "RESULTS OF TH|
00001E40: 49 53 20 47 52 4F 55 50 3A 22 00 50 26 10 0E 99 |IS GROUP:".P&...|
00001E50: 00 7E 26 1A 0E 99 22 49 54 45 4D 22 3B A3 37 29 |.~&..."ITEM";.7)|
00001E60: 3B 22 4D 49 4E 45 22 A3 31 34 29 22 59 4F 55 52 |;"MINE".14)"YOUR|
00001E70: 53 22 A3 32 32 29 22 52 45 53 55 4C 54 22 00 A2 |S".22)"RESULT"..|
00001E80: 26 24 0E 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |&$.."-----------|
00001E90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001EA0: 2D 22 00 AE 26 2E 0E 81 20 4A B2 31 A4 35 00 C3 |-"..&... J.1.5..|
00001EB0: 26 38 0E 43 28 4A 29 B2 4E 31 28 4A 29 AA 4E 32 |&8.C(J).N1(J).N2|
00001EC0: 28 4A 29 00 DB 26 42 0E 8B 20 43 28 4A 29 20 B2 |(J)..&B.. C(J) .|
00001ED0: 20 41 28 4A 29 20 A7 33 36 36 30 00 F4 26 43 0E | A(J) .3660..&C.|
00001EE0: 8B 20 43 28 4A 29 B3 B1 20 41 28 4A 29 20 A7 20 |. C(J).. A(J) . |
00001EF0: 33 36 39 30 00 08 27 4C 0E 52 24 28 4A 29 B2 22 |3690..'L.R$(J)."|
00001F00: 43 4F 52 52 45 43 54 22 00 14 27 56 0E 43 4F B2 |CORRECT"..'V.CO.|
00001F10: 43 4F AA 31 00 1F 27 60 0E 89 20 33 37 31 30 00 |CO.1..'`.. 3710.|
00001F20: 35 27 6A 0E 52 24 28 4A 29 B2 22 05 2A 57 52 4F |5'j.R$(J).".*WRO|
00001F30: 4E 47 2A 81 22 00 41 27 74 0E 57 4F B2 57 4F AA |NG*.".A't.WO.WO.|
00001F40: 31 00 65 27 7E 0E 99 20 4A 3B 22 2E 22 A3 35 29 |1.e'~.. J;".".5)|
00001F50: 43 28 4A 29 A3 31 34 29 41 28 4A 29 A3 32 32 29 |C(J).14)A(J).22)|
00001F60: 52 24 28 4A 29 00 6D 27 88 0E 82 20 4A 00 75 27 |R$(J).m'... J.u'|
00001F70: 92 0E 99 3A 99 00 7D 27 A6 0E 82 20 49 00 90 27 |...:..}'... I..'|
00001F80: AB 0E 81 20 58 B2 31 A4 35 30 30 30 3A 82 20 58 |... X.1.5000:. X|
00001F90: 00 B4 27 B0 0E 8F 20 2A 20 50 52 4F 47 52 41 4D |..'... * PROGRAM|
00001FA0: 20 54 45 52 4D 49 4E 41 54 49 4F 4E 20 50 4F 49 | TERMINATION POI|
00001FB0: 4E 54 20 2A 00 BA 27 BA 0E 99 00 C3 27 BF 0E 99 |NT *..'.....'...|
00001FC0: 22 93 22 00 E0 27 C4 0E 99 22 A6 A6 A6 A6 A6 A6 |"."..'..."......|
00001FD0: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 22 |..............."|
00001FE0: 00 FD 27 C5 0E 99 22 A6 20 20 20 20 20 20 20 20 |..'...". |
00001FF0: 20 20 20 20 20 20 20 20 20 20 20 A6 22 00 1A 28 | ."..(|
00002000: C6 0E 99 22 A6 20 20 20 20 53 43 4F 52 45 20 42 |...". SCORE B|
00002010: 4F 41 52 44 20 20 20 20 A6 22 00 37 28 C7 0E 99 |OARD .".7(...|
00002020: 22 A6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00002030: 20 20 20 20 20 A6 22 00 54 28 C8 0E 99 22 A6 A6 | .".T(..."..|
00002040: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00002050: A6 A6 A6 22 00 6F 28 E2 0E 99 22 51 55 45 53 54 |...".o(..."QUEST|
00002060: 49 4F 4E 53 20 22 A3 31 35 29 43 4F AA 57 4F 00 |IONS ".15)CO.WO.|
00002070: 75 28 EC 0E 99 00 91 28 F6 0E 99 22 4E 55 4D 42 |u(.....(..."NUMB|
00002080: 45 52 20 43 4F 52 52 45 43 54 22 A3 32 30 29 43 |ER CORRECT".20)C|
00002090: 4F 00 AD 28 00 0F 99 22 4E 55 4D 42 45 52 20 2A |O..(..."NUMBER *|
000020A0: 57 52 4F 4E 47 2A 22 A3 32 30 29 57 4F 00 B3 28 |WRONG*".20)WO..(|
000020B0: 0A 0F 99 00 E2 28 14 0F 99 22 59 4F 55 52 20 53 |.....(..."YOUR S|
000020C0: 43 4F 52 45 20 49 53 20 12 9C 22 3B 28 43 4F AD |CORE IS ..";(CO.|
000020D0: 28 43 4F AA 57 4F 29 29 AC 31 30 30 3B 22 25 92 |(CO.WO)).100;"%.|
000020E0: 81 22 00 00 29 1E 0F 99 22 A8 A8 A8 A8 A8 A8 A8 |."..)...".......|
000020F0: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 22 |..............."|
00002100: 00 06 29 28 0F 99 00 2B 29 32 0F 99 22 44 4F 20 |..)(...+)2.."DO |
00002110: 59 4F 55 20 57 41 4E 4E 41 20 50 4C 41 59 20 41 |YOU WANNA PLAY A|
00002120: 47 41 49 4E 20 28 59 2F 4E 29 22 00 3F 29 3C 0F |GAIN (Y/N)".?)<.|
00002130: 85 20 45 24 3A 8B 45 24 B2 22 59 22 A7 20 8A 00 |. E$:.E$."Y". ..|
00002140: 71 29 46 0F 8B 20 45 24 B2 22 4E 22 A7 20 99 22 |q)F.. E$."N". ."|
00002150: 93 54 48 41 4E 4B 20 59 4F 55 20 56 45 52 59 20 |.THANK YOU VERY |
00002160: 4D 55 43 48 2E 20 20 42 59 45 20 21 21 21 21 21 |MUCH. BYE !!!!!|
00002170: 22 00 8F 29 50 0F 8B 20 45 24 B3 B1 22 59 22 20 |"..)P.. E$.."Y" |
00002180: AF 20 45 24 B3 B1 22 4E 22 A7 20 33 37 37 30 00 |. E$.."N". 3770.|
00002190: 95 29 88 13 8F 00 9B 29 92 13 8F 00 A1 29 9C 13 |.).....).....)..|
000021A0: 8F 00 A7 29 A6 13 8F 00 CD 29 B0 13 8F 20 2D 2D |...).....)... --|
000021B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000021C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F3 29 |-------------..)|
000021D0: BA 13 8F 20 2D 20 54 48 49 53 20 50 52 4F 47 52 |... - THIS PROGR|
000021E0: 41 4D 4D 45 20 49 53 20 42 41 53 45 44 20 4F 4E |AMME IS BASED ON|
000021F0: 20 20 2D 00 19 2A C4 13 8F 20 2D 20 41 20 43 4F | -..*... - A CO|
00002200: 4D 4D 4F 4E 20 42 41 53 49 43 20 50 52 4F 47 52 |MMON BASIC PROGR|
00002210: 41 4D 4D 45 20 20 20 20 2D 00 3F 2A CE 13 8F 20 |AMME -.?*... |
00002220: 2D 20 57 48 49 43 48 20 59 4F 55 20 43 41 4E 20 |- WHICH YOU CAN |
00002230: 46 49 4E 44 20 49 4E 3A 20 20 20 20 20 20 2D 00 |FIND IN: -.|
00002240: 65 2A D8 13 8F 20 2D 20 42 41 53 49 43 20 43 4F |e*... - BASIC CO|
00002250: 4D 50 55 54 45 52 20 50 52 4F 47 52 41 4D 53 20 |MPUTER PROGRAMS |
00002260: 46 4F 52 20 2D 00 8B 2A E2 13 8F 20 2D 20 54 48 |FOR -..*... - TH|
00002270: 45 20 48 4F 4D 45 20 3D 3D 3D 3D 3E 20 43 48 41 |E HOME ====> CHA|
00002280: 52 4C 45 53 20 44 2E 20 20 20 2D 00 B1 2A EC 13 |RLES D. -..*..|
00002290: 8F 20 2D 20 53 54 45 52 4E 42 45 52 47 20 20 20 |. - STERNBERG |
000022A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000022B0: 2D 00 D7 2A F6 13 8F 20 2D 20 20 20 20 20 20 20 |-..*... - |
000022C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000022D0: 20 20 20 20 20 20 2D 00 FD 2A 00 14 8F 20 2D 20 | -..*... - |
000022E0: 54 48 49 53 20 50 52 4F 47 52 41 4D 4D 45 20 49 |THIS PROGRAMME I|
000022F0: 53 20 41 44 41 50 54 45 44 20 20 20 2D 00 23 2B |S ADAPTED -.#+|
00002300: 0A 14 8F 20 2D 20 54 4F 20 54 48 45 20 43 42 4D |... - TO THE CBM|
00002310: 2D 36 34 20 42 59 20 45 52 57 49 4E 20 52 4F 2D |-64 BY ERWIN RO-|
00002320: 20 20 2D 00 49 2B 14 14 8F 20 2D 20 44 59 4E 53 | -.I+... - DYNS|
00002330: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00002340: 20 20 20 20 20 20 20 20 2D 00 6F 2B 1E 14 8F 20 | -.o+... |
00002350: 2D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |-===============|
00002360: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 2D 00 |==============-.|
00002370: 00 00 B2 |... |
....... MATH PRACTICE.......<.... 53281
,12:. 53280,12:."..".L...."..........MAT
H PRACTICE":."-------------"......"PROGR
AMMED BY .ERWIN RODYNS."......".ON 21/12
/'83":."."...... X.1.4000:.......".*****
***********************************"....
.."*
*".L...."*
*"......"* ..MENU
.. *"......"*
==== *":.:.....
.."* 1. MULTIPLICATION ----> A
*"......"* 2. DIVISION ----> B
*".D...."* 3. SUBTRACTION
----> C *".T...."* 4. ADDITIO
N ----> D *"......"*****
***********************************":...
...."PRINT YOUR CHOICE.".V.... A$:. A$."
A". 40...... A$."B". 1000... .. A$."C".
2000...!.. A$."D". 3000.@.".. A$.."A" .
A$.."B" . A$.."C" . A$.."D" . 30.F.'..
MULTIPLICATION.N.(.Y.1.V
.2.S.1..<.M.50...F.CO.0...P.WO.0...Z..
R$(5)...D.. A(5)...N.. N1(5)...X.. N2(5)
.K.... C(5)...... 53280,3:. 53281,3:."."
.3.... ".ENTER THE NUMBER OF DIGITS FOR
THE PRACTICE NUMERS. (MAX. 4)".;...
. S.R. .."HOW MANY ITEMS SHALL I PRINT(5
,10,15,20,ETC...)".Z.... M..............
.H.. ****** PROCESSING AREA ********...R
.. I.1. M.5.H.... J.1. 5.....N1(J)..(.(Y
).10.S).....N2(J)..(.(Y).10.S)...... J..
.... J.1.5...... " ";.".... K. 1.S.>."..
N1(J)..10.(S.K) . 330.X.,.. (S.K).N1(J)
.0 . 330.B.6.." ";.J.@.. K.}.J.. N1(J);.
J.8);...T.. J...^.....H.. J. 1. 5...R..
"X";...|.. K.1.S.L.... N2(J)..10.(S.K) .
430...... (S.K).N2(J).0 . 430...... " "
;...... K...... N2(J);.J.8);...... J...B
...'.L.. J.1. 5.8.V.. K. 1 . S.3.C.... "
-";.K.... K.W.... .J.8)._.... J.K.... J.
1.5.Q.....Y.... J...&.."ENTER THE ANSWER
S,(WITH A COMMA BETWEEN)".H.0.. A(1),A(2
),A(3),A(4),A(5).N.:.....;.. ***** PRINT
S GORUP RESULTS *****...D.. X.1.500:.:."
.".).N.. "RESULTS OF THIS GROUP:"./.X...
].B.."ITEM";.7);"MINE".14)"YOURS".22)"RE
SULT"...L.."----------------------------
"...V.. J.1.5.....C(J).N1(J).N2(J)......
C(J).. A(J) . 690.N...R$(J)."CORRECT"..
...CO.CO .1...... 710.....R$(J).".*WRONG
*.".....WO.WO.1.+.F.. J;".".5)C(J).14)A(
J).22)R$(J).3.P.. J.9.Z...?.....G.... I.
M.....S.... ** PROGRAM TERMINATION POINT
**...... X.1.5000:.:."."...... ".......
...............".G.... ".
."...... ". SCORE BOARD ."..
.... ". .".$. .. "...
...................".A.*..:."QUESTIONS "
.15)CO.WO.G.4...D.>.. "NUMBER CORRECT".2
0)CO...H.. "NUMBER *WRONG*".20)WO...R...
..\.. "YOUR SCORE IS ..";(CO.(CO.WO)).10
0;"%"...].."."...F.. "..................
....."...P.....Z.."DO YOU WANNA PLAY AGA
IN (Y/N). .... D$:. D$."Y". . 14.J.... D
$."N". .". THANK YOU. GOODBYE!":..H....
D$.."N" . D$.."Y" . 770.N.....T.....Z..
........ DIVISION....
...E.... **NOTE** INDIVIDUEAL MACHINE...
... DIFFERENCES IN HANDLING MUMERIC.....
. ITEMS MAY CAUSE INCORRECT ANS-.6.... W
ERS ANALYSIS WHEN DEALING WITH.\.... LAR
GE ANSWERS WITH EXTENDED DE-.S.... CIMAL
POSITIONS....$.. 53281,16:. 53280,16:."
.."...B.. *** DATA INITIALIZATION ***...
L.Y.1.E.V.S.1.N.`.M.50.W.J.CO.0...T.WO.0
...~.. R$(5)...... A(5)...... N1(5).....
. N2(5)...... C(5).V...."ENTER THE NUMBE
R OF DIGITS FOR THE PRAC-TICE DIVISOR".^
.... S...D.."ENTER THE NUMBER OF DIGITS
FOR THE PRAC-TICE DIVIDEND"...N.. S2...X
.."ENTER THE NUMBER OF DECIMAL POSITIONS
FOR THE RESULT"...... S3.(...."HOW MA
NY ITEMS SHALL I PRINT (5,10,15, 20, ET
C.....)".0.... M.9...."."._.... *******
PROCESSING AREA *******.T.... I.1 . M.5:
."."...(.. J.1. 5...2.N1(J)..(.(Y).10.S)
...<.. N1(J).0 .1330.D.F.N2(J)..(.(Y).10
.S2).W.K.. N2(J).0.1350...P.. J...Z.. J.
1. 5...D.."--------";...N.. J...X......
.. J. 1. 5.%...K.S.10.9.... N1(J)"/"N2(J
).K....:."==============================
==========".S.... J...R.."ENTER THE ANSW
ERS,(WITH A COMMA BETWEEN)".B.... A(1),A
(2),A(3),A(4),A(5).K...."."...... **** P
RINTS GROUP RESULTS ****............ "RE
SULTS OF THIS GROUP:".......I...."ITEM";
.7);"MINE".14)"YOURS".22)"RESULT".M...."
----------------------------".Y.".. J.1.
5...,.. N1(J).0 . 1650...6.C(J).N1(J).N2
(J)...@.C1..(C(J).10.(S3.1)).Q.J.C2..(C(
J).10.S3)...T.. (C1.(C2.10)).5 .1640...^
.C2.C2.1...H.C2.(C2.(10.S3)).0.R.. C2.A(
J) .(1.10.(S3.1)) . 1700.U.|.. C2.A(J) .
(.1.10.(S3.1)) . 1700.I...R$(J)."CORRECT
".U...CO.CO.1...... 1720.....R$(J).".*WR
ONG*.".....WO.WO.1.D.... J;".".5)C2.14)A
(J).22)R$(J).M.B.C2.0.U.L.. J...V.......
....... I...... X.1.5000:.X.!.... ** PRO
GRAM TERMINATION POINT **.'.....0...."."
.M....".....................".J....".
."......". SCORE BOAR
D ."......". .".A..
..".....................".I.!..:....&.."
QUESTIONS ".15)CO.WO...0.....:.."NUMBER
CORRECT".20)CO.".D.."NUMBER *WRONG*".20)
WO.(.N...T.X.."YOUR SCORE IS .."(CO.(CO.
WO)).100;"%".U.B..:.:.".................
....".{.L.....V.."DO YOU WANNA PLAY AGAI
N (Y/N)":. E$...... E$."Y". ....... E$."
N". .".THANK YOU. GOODBYE!!":....... E$.
."Y" . E$.."N" . 1795...P..".":. 53281,8
:. 53280,8:.".".%.Z...J....
SUBSTRACTION.N.... **** DATA INITI
ALIZATION ****.V...Y.1.~...S.1.....M.50.
....CO.0... .WO.0...*.. R$(5)...4.. N1(5
)...>.. N2(5).H.H.. C(5).S.R.. A(5)...\.
. "ENTER THE NUMBER OF DIGITS FOR THE PR
AC-TICE NUMBERS (MAX. 4)".!.F.. S.].P.."
HOW MANY ITEMS SHALL I PRINT (5, 10, 15,
20, ETC....)".E.Z.. M.M....:....... ****
** PROCESSING AREA *******. .... I.1.M.5
...... J.1.5.C...N1(J)..(.(Y).10.S).Z...
N2(J)..(.(Y).10.S)...J.. J...T.. J.1 . 5
...... " ";...... K.1.S.$.... N1(J)..10.
(S.K) . 2330.?.... (S.K).N1(J).0 . 2330.
I...." ";.Q.... K.D.... N1(J);.J.8);.L.$
.. J.R.....~.8.. J.1.5...B.."-";...L.. K
.1. S...V.. N2(J)..10.(S.K) . 2430.M.`..
(S.K).N2(J).0 . 2430.W.J.." ";...T.. K.
..~.. N2(J);.J.8);...... J............ J
. 1.5......K.1 . S.3.'.... "-";./.... K.
;.D.. .J.8).C.N.. J.P.X.. J.1. 5.V.....^
.... J......"ENTER THE ANSWERS,(WITH A C
OMMA BETWEEN)"...... A(1),A(2),A(3),A(4)
,A(5)......".".Z.... **** PRINT GROUP RE
SULTS ****............ "RESULTS OF THIS
GROUP:"...(...3.2.."ITEM";.7);"MINE".14)
"YOURS".22)"RESULT".W.<.."--------------
--------------".C.F.. J.1.5.X.P.C(J).N1(
J).N2(J)...Y.. C(J) . A(J) . 2660...Z..
C(J) .. A(J) .2690...D.R$(J).".CORRECT".
K.N.CO.CO.1.U.X..2710.....R$(J).".*WRONG
*.".....WO.WO.1.. ... J;".".5)C(J).14)A(
J).22)R$(J).# .. J.) ..../ ....7 ... I.
L C.. X.1 . 5000:. X.R H.. ** PROGRAM TE
RMINATION POINT **.X R.... W..".".. ..."
.....................".. ...".
.".X ...". SCORE BOARD ."
.. ...". ."..!..."....
................."./!...:."QUESTIONS ".1
5)CO.WO.5!....S!... "NUMBER CORRECT ".20
)CO.O!..."NUMBER *WRONG*".20)WO.U!"....!
,.. "YOUR SCORE IS ..";(CO.(CO.WO)).100;
"%..".C!6.."......................".I!@.
...!J.."DO YOU WANNA PLAY AGAIN (Y/N)"..
"T.. E$:. E$."Y". ..0"^.. E$."N" . .".TH
ANK YOU. BYE, BYE !!!":..O"H.. E$.."Y" .
E$.."N" . 2775.L"... 53280,9:.53281,9:.
"..".R"B...."L.. ADDIT
ION.."V.. ***** DATA INITIALIZATION ****
*.A"..Y.1.I"..S.1.R"..M.50.."..CO.0.."..
WO.0.."... R$(5).."... A(5)..#&.. N1(5).
.#0.. N2(5)..#:.. C(5).D#D.. "ENTER THE
NUMBER OF DIGITS FOR THE PRAC-TICE NUMBE
RS (MAX. 4).L#N.. S..#X.."HOW MANY ITEM
S SHALL I PRINT (5, 10, 15,20, ETC....)"
..#B.. M..#L....#V....#... ***** PROCESS
ING AREA *****..#... I.1 . M.5..#... J.1
.5..$..N1(J)..(.(Y).10.S).($..N2(J)..(.(
Y).10.S).0$... J.<$... J.1.5.G$F.. " ";.
S$P.. K.1.S.P$Z.. N1(J)..10.(S.K) . 3330
..$... (S.K).N1(J).0 . 3330..$... " ";..
$... K..$... N1(J);.J.8);..$... J..$....
K$ .. J.1.5.V$*.. "+";..$4.. K.1 . S..%>
.. N2(J)..10.(S.K) . 3430..%H.. (S.K).N2
(J).0. 3430.%%R.." ";.-%\.. K.@%F.. N2(J
);.J.8);.H%P.. J.N%Z...Z%... J.1.5.H%...
K.1.S.3.R%..."-";.Z%... K..%... .J.8)..
%... J..%... J.1.5. %J....%T.. J.X%..."E
NTER THE ANSWERS,(WITH A COMMA BETWEEN)"
..%... A(1),A(2),A(3),A(4),A(5)..&..."."
.%&... **** PRINTS GROUP RESULTS ****.+&
....J&... "RESULTS OF THIS GROUP:".P&...
.~&..."ITEM";.7);"MINE".14)"YOURS".22)"R
ESULT"..&$.."---------------------------
-"..&... J.1.5.C&8.C(J).N1(J).N2(J)..&B.
. C(J) . A(J) .3660..&C.. C(J).. A(J) .
3690..'L.R$(J)."CORRECT"..'V.CO.CO.1..'`
.. 3710.5'J.R$(J).".*WRONG*.".A'T.WO.WO.
1.E'~.. J;".".5)C(J).14)A(J).22)R$(J).M'
... J.U'...:..}'... I..'... X.1.5000:. X
..'... * PROGRAM TERMINATION POINT *..'.
...C'..."."..'D.."....................."
..'E..". ."..(F..".
SCORE BOARD .".7(G..".
.".T(H..".....................".O(.
.."QUESTIONS ".15)CO.WO.U(.....(..."NUMB
ER CORRECT".20)CO..(..."NUMBER *WRONG*".
20)WO..(.....(..."YOUR SCORE IS ..";(CO.
(CO.WO)).100;"%.."..)..."...............
......."..)(...+)2.."DO YOU WANNA PLAY A
GAIN (Y/N)".?)<.. E$:.E$."Y". ..Q)F.. E$
."N". .".THANK YOU VERY MUCH. BYE !!!!!
"..)P.. E$.."Y" . E$.."N". 3770..).....)
.....).....)....M)... ------------------
-------------..)... - THIS PROGRAMME IS
BASED ON -..*D.. - A COMMON BASIC PROGR
AMME -.?*N.. - WHICH YOU CAN FIND IN:
-.E*X.. - BASIC COMPUTER PROGRAMS
FOR -..*... - THE HOME ====> CHARLES D.
-..*... - STERNBERG
-.W*... - -.
.*... - THIS PROGRAMME IS ADAPTED -.#+
... - TO THE CBM-64 BY ERWIN RO- -.I+..
. - DYNS. -.O+...
-=============================-....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL