/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / education / a / howmany / !HowMany / !RUNIMAGE

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 09 20 eb 20 31 | 32 0d 00 0b 1e 20 2a 53 |.... . 1|2.... *S|
|00000010| 4c 4f 41 44 20 3c 4f 42 | 45 59 24 44 49 52 3e 2e |LOAD <OB|EY$DIR>.|
|00000020| 53 50 52 49 54 45 53 0d | 00 0f 0f 20 50 24 3d 22 |SPRITES.|... P$="|
|00000030| 3e 22 3a 50 3d 35 0d 00 | 14 21 20 de 20 54 65 78 |>":P=5..|.! . Tex|
|00000040| 74 24 28 31 35 29 2c 54 | 65 78 74 28 31 35 29 2c |t$(15),T|ext(15),|
|00000050| 51 28 31 30 30 30 29 0d | 00 1e 51 20 54 65 78 74 |Q(1000).|..Q Text|
|00000060| 24 28 31 29 3d 22 48 6f | 77 20 4d 61 6e 79 3f 22 |$(1)="Ho|w Many?"|
|00000070| 3a 54 65 78 74 24 28 32 | 29 3d 22 53 71 75 61 72 |:Text$(2|)="Squar|
|00000080| 65 73 22 3a 54 65 78 74 | 24 28 33 29 3d 22 54 72 |es":Text|$(3)="Tr|
|00000090| 69 6e 67 6c 65 73 22 3a | 54 65 78 74 24 28 34 29 |ingles":|Text$(4)|
|000000a0| 3d 22 43 75 62 65 73 22 | 0d 00 28 0d 20 f2 43 65 |="Cubes"|..(. .Ce|
|000000b0| 6e 74 72 65 3a 0d 00 32 | 5c 20 f1 8a 54 65 78 74 |ntre:..2|\ ..Text|
|000000c0| 28 31 29 2c 32 29 3b 54 | 65 78 74 24 28 31 29 3a |(1),2);T|ext$(1):|
|000000d0| f1 8a 54 65 78 74 28 32 | 29 2c 35 29 3b 54 65 78 |..Text(2|),5);Tex|
|000000e0| 74 24 28 32 29 3a f1 8a | 54 65 78 74 28 33 29 2c |t$(2):..|Text(3),|
|000000f0| 37 29 3b 54 65 78 74 24 | 28 33 29 3a f1 8a 54 65 |7);Text$|(3):..Te|
|00000100| 78 74 28 34 29 2c 39 29 | 3b 54 65 78 74 24 28 34 |xt(4),9)|;Text$(4|
|00000110| 29 0d 00 3c 0b 20 2a 46 | 58 34 2c 31 0d 00 64 06 |)..<. *F|X4,1..d.|
|00000120| 20 f5 0d 00 6e 0c 20 45 | 24 3d bf 28 34 29 0d 00 | ...n. E|$=.(4)..|
|00000130| 78 22 20 e7 45 24 3d bd | 28 31 33 38 29 20 8c f1 |x" .E$=.|(138) ..|
|00000140| 8a 33 30 2c 50 29 3b 22 | 20 22 3a 50 3d 50 2b 32 |.30,P);"| ":P=P+2|
|00000150| 0d 00 82 22 20 e7 45 24 | 3d bd 28 31 33 39 29 20 |..." .E$|=.(139) |
|00000160| 8c f1 8a 33 30 2c 50 29 | 3b 22 20 22 3a 50 3d 50 |...30,P)|;" ":P=P|
|00000170| 2d 32 0d 00 8c 14 20 e7 | 50 3d 35 8c f1 8a 33 30 |-2.... .|P=5...30|
|00000180| 2c 50 29 3b 50 24 0d 00 | 96 14 20 e7 50 3d 37 8c |,P);P$..|.. .P=7.|
|00000190| f1 8a 33 30 2c 50 29 3b | 50 24 0d 00 a0 14 20 e7 |..30,P);|P$.... .|
|000001a0| 50 3d 39 8c f1 8a 33 30 | 2c 50 29 3b 50 24 0d 00 |P=9...30|,P);P$..|
|000001b0| b4 06 20 3a 0d 00 be 0e | 20 e7 50 3e 39 8c 20 50 |.. :....| .P>9. P|
|000001c0| 3d 35 0d 00 c8 0e 20 e7 | 50 3c 35 8c 20 50 3d 39 |=5.... .|P<5. P=9|
|000001d0| 0d 00 dc 10 20 fd 20 45 | 24 3d bf 28 2d 37 34 29 |.... . E|$=.(-74)|
|000001e0| 0d 00 e6 09 20 2a 46 58 | 34 0d 00 f0 1e 20 e7 20 |.... *FX|4.... . |
|000001f0| 50 3d 35 20 8c 20 f2 53 | 71 75 61 72 65 3a eb 31 |P=5 . .S|quare:.1|
|00000200| 32 3a e5 8d 54 5e 40 0d | 00 fa 20 20 e7 20 50 3d |2:..T^@.|..  . P=|
|00000210| 37 20 8c 20 f2 54 72 69 | 6e 67 6c 65 73 3a eb 31 |7 . .Tri|ngles:.1|
|00000220| 32 3a e5 8d 54 5e 40 0d | 01 04 1c 20 e7 20 50 3d |2:..T^@.|... . P=|
|00000230| 39 20 8c 20 f2 43 75 62 | 65 3a eb 31 32 3a e5 8d |9 . .Cub|e:.12:..|
|00000240| 54 5e 40 0d 01 0e 05 3a | 0d 01 2c 24 20 dd f2 53 |T^@....:|..,$ ..S|
|00000250| 71 75 61 72 65 3a f1 8a | 54 65 78 74 28 32 29 2c |quare:..|Text(2),|
|00000260| 31 31 29 3b 54 65 78 74 | 24 28 32 29 0d 01 36 4b |11);Text|$(2)..6K|
|00000270| 20 54 65 78 74 24 28 31 | 29 3d 22 46 6f 72 20 22 | Text$(1|)="For "|
|00000280| 3a 54 65 78 74 24 28 32 | 29 3d 22 41 2e 20 53 71 |:Text$(2|)="A. Sq|
|00000290| 75 61 72 65 73 22 3a 54 | 65 78 74 24 28 33 29 3d |uares":T|ext$(3)=|
|000002a0| 22 42 2e 20 52 65 63 74 | 61 6e 67 6c 65 73 22 3a |"B. Rect|angles":|
|000002b0| f2 43 65 6e 74 72 65 0d | 01 40 48 20 f1 8a 54 65 |.Centre.|.@H ..Te|
|000002c0| 78 74 28 31 29 2c 31 32 | 29 3b 54 65 78 74 24 28 |xt(1),12|);Text$(|
|000002d0| 31 29 3a f1 8a 54 65 78 | 74 28 32 29 2c 31 34 29 |1):..Tex|t(2),14)|
|000002e0| 54 65 78 74 24 28 32 29 | 3a f1 8a 54 65 78 74 28 |Text$(2)|:..Text(|
|000002f0| 33 29 2c 31 35 29 3b 54 | 65 78 74 24 28 33 29 0d |3),15);T|ext$(3).|
|00000300| 01 4a 09 20 41 24 3d be | 0d 01 54 15 20 e7 20 41 |.J. A$=.|..T. . A|
|00000310| 24 3d 22 41 22 20 8c 20 | f2 53 71 3a e1 0d 01 5e |$="A" . |.Sq:...^|
|00000320| 16 20 e7 20 41 24 3d 22 | 42 22 20 8c 20 f2 72 65 |. . A$="|B" . .re|
|00000330| 63 3a e1 0d 01 63 09 e5 | 8d 44 4a 41 0d 01 68 0c |c:...c..|.DJA..h.|
|00000340| 20 dd f2 72 65 63 3a db | 0d 01 72 18 20 2a 53 43 | ..rec:.|..r. *SC|
|00000350| 48 4f 4f 53 45 20 52 65 | 63 74 61 6e 67 6c 65 73 |HOOSE Re|ctangles|
|00000360| 0d 01 7c 11 20 f0 26 45 | 44 2c 31 30 30 2c 33 30 |..|. .&E|D,100,30|
|00000370| 30 0d 01 86 0a 20 f2 54 | 65 78 74 0d 01 90 4f 20 |0.... .T|ext...O |
|00000380| f1 22 45 6e 74 65 72 20 | 78 20 56 61 6c 75 65 20 |."Enter |x Value |
|00000390| 6f 66 20 22 3a e8 20 22 | 52 65 63 74 61 6e 67 6c |of ":. "|Rectangl|
|000003a0| 65 20 22 3b 58 3a f1 20 | 22 45 6e 74 65 72 20 79 |e ";X:. |"Enter y|
|000003b0| 20 56 61 6c 75 65 20 6f | 66 22 3a e8 22 52 65 63 | Value o|f":."Rec|
|000003c0| 74 61 6e 67 6c 65 20 22 | 3b 59 0d 01 9a 12 20 f4 |tangle "|;Y.... .|
|000003d0| 20 43 61 6c 63 75 6c 61 | 74 69 6f 6e 0d 01 a4 16 | Calcula|tion....|
|000003e0| 20 e7 20 58 3c 59 20 8c | 20 41 3d 58 20 8b 20 41 | . X<Y .| A=X . A|
|000003f0| 3d 59 0d 01 ae 08 20 52 | 3d 30 0d 01 b8 0d 20 e3 |=Y.... R|=0.... .|
|00000400| 54 20 3d 30 b8 20 41 0d | 01 c2 13 20 4d 3d 28 58 |T =0. A.|... M=(X|
|00000410| 2d 54 29 2a 28 59 2d 54 | 29 3a 0d 01 cc 0a 20 52 |-T)*(Y-T|):.... R|
|00000420| 3d 52 2b 4d 0d 01 d6 06 | 20 ed 0d 01 e0 1e 20 f1 |=R+M....| ..... .|
|00000430| 20 22 4e 75 6d 62 65 72 | 20 6f 66 20 53 71 75 61 | "Number| of Squa|
|00000440| 72 65 73 20 3a 22 3b 52 | 0d 01 ea 17 20 f1 3a e8 |res :";R|.... .:.|
|00000450| 20 22 41 6e 6f 74 68 65 | 72 20 22 3b 41 4e 24 0d | "Anothe|r ";AN$.|
|00000460| 01 f4 16 20 e7 20 41 4e | 24 3d 22 59 22 20 8c 20 |... . AN|$="Y" . |
|00000470| e5 8d 74 50 41 0d 01 fe | 12 20 e7 20 41 4e 24 3d |..tPA...|. . AN$=|
|00000480| 22 4e 22 20 8c 20 e1 0d | 02 08 06 20 e1 0d 02 58 |"N" . ..|... ...X|
|00000490| 09 20 dd f2 53 71 0d 02 | 62 06 20 db 0d 02 6c 15 |. ..Sq..|b. ...l.|
|000004a0| 20 2a 53 43 48 4f 4f 53 | 45 20 53 71 75 61 72 65 | *SCHOOS|E Square|
|000004b0| 73 0d 02 71 11 20 f0 26 | 45 44 2c 31 30 30 2c 33 |s..q. .&|ED,100,3|
|000004c0| 30 30 0d 02 76 0a 20 f2 | 54 65 78 74 0d 02 80 28 |00..v. .|Text...(|
|000004d0| 20 f1 20 22 45 6e 74 65 | 72 20 6c 65 6e 67 74 68 | . "Ente|r length|
|000004e0| 20 6f 66 20 22 3a e8 22 | 6f 6e 65 20 73 69 64 65 | of ":."|one side|
|000004f0| 20 22 3b 58 0d 02 8a 12 | 20 f4 20 43 61 6c 63 75 | ";X....| . Calcu|
|00000500| 6c 61 74 69 6f 6e 0d 02 | 8f 08 3a 52 3d 30 0d 02 |lation..|..:R=0..|
|00000510| 94 0b 20 e3 54 3d 31 b8 | 58 0d 02 9e 0a 20 4d 3d |.. .T=1.|X.... M=|
|00000520| 54 5e 32 0d 02 a8 0a 20 | 52 3d 52 2b 4d 0d 02 b2 |T^2.... |R=R+M...|
|00000530| 06 20 ed 0d 02 bc 1e 20 | f1 20 22 4e 75 6d 62 65 |. ..... |. "Numbe|
|00000540| 72 20 6f 66 20 53 71 75 | 61 72 65 73 20 3a 22 3b |r of Squ|ares :";|
|00000550| 52 0d 02 c6 17 20 f1 3a | e8 20 22 41 6e 6f 74 68 |R.... .:|. "Anoth|
|00000560| 65 72 20 22 3b 41 4e 24 | 0d 02 d0 17 20 20 e7 20 |er ";AN$|....  . |
|00000570| 41 4e 24 3d 22 59 22 20 | 8c 20 e5 8d 74 40 42 0d |AN$="Y" |. ..t@B.|
|00000580| 02 da 13 20 20 e7 20 41 | 4e 24 3d 22 4e 22 20 8c |...  . A|N$="N" .|
|00000590| 20 e1 0d 02 e4 06 20 e1 | 0d 03 20 0b 20 dd f2 43 | ..... .|.. . ..C|
|000005a0| 75 62 65 0d 03 2a 06 20 | db 0d 03 34 13 20 2a 53 |ube..*. |...4. *S|
|000005b0| 43 48 4f 4f 53 45 20 43 | 55 42 45 53 0d 03 3e 11 |CHOOSE C|UBES..>.|
|000005c0| 20 f0 26 45 44 2c 31 30 | 30 2c 33 30 30 0d 03 48 | .&ED,10|0,300..H|
|000005d0| 0a 20 f2 54 65 78 74 0d | 03 52 28 20 f1 20 22 45 |. .Text.|.R( . "E|
|000005e0| 6e 74 65 72 20 6c 65 6e | 67 74 68 20 6f 66 20 22 |nter len|gth of "|
|000005f0| 3a e8 22 6f 6e 65 20 73 | 69 64 65 20 22 3b 58 0d |:."one s|ide ";X.|
|00000600| 03 5c 12 20 f4 20 43 61 | 6c 63 75 6c 61 74 69 6f |.\. . Ca|lculatio|
|00000610| 6e 0d 03 66 09 20 3a 52 | 3d 30 0d 03 70 0c 20 20 |n..f. :R|=0..p.  |
|00000620| e3 54 3d 31 b8 58 0d 03 | 7a 0a 20 4d 3d 54 5e 33 |.T=1.X..|z. M=T^3|
|00000630| 0d 03 84 0b 20 20 52 3d | 52 2b 4d 0d 03 8e 06 20 |....  R=|R+M.... |
|00000640| ed 0d 03 98 1c 20 f1 20 | 22 4e 75 6d 62 65 72 20 |..... . |"Number |
|00000650| 6f 66 20 43 75 62 65 73 | 20 3a 22 3b 52 0d 03 a2 |of Cubes| :";R...|
|00000660| 17 20 f1 3a e8 20 22 41 | 6e 6f 74 68 65 72 20 22 |. .:. "A|nother "|
|00000670| 3b 41 4e 24 0d 03 ac 16 | 20 e7 20 41 4e 24 3d 22 |;AN$....| . AN$="|
|00000680| 59 22 20 8c 20 e5 8d 44 | 52 43 0d 03 b6 12 20 e7 |Y" . ..D|RC.... .|
|00000690| 20 41 4e 24 3d 22 4e 22 | 20 8c 20 e1 0d 03 c0 06 | AN$="N"| . .....|
|000006a0| 20 e1 0d 03 e7 05 3a 0d | 03 e8 0f 20 dd f2 54 72 | .....:.|... ..Tr|
|000006b0| 69 6e 67 6c 65 73 0d 03 | f2 06 20 db 0d 03 fc 16 |ingles..|.. .....|
|000006c0| 20 2a 53 43 48 4f 4f 53 | 45 20 54 52 49 4e 47 4c | *SCHOOS|E TRINGL|
|000006d0| 45 53 0d 04 06 16 20 f0 | 26 45 44 2c 31 30 30 2c |ES.... .|&ED,100,|
|000006e0| 35 30 3a f2 54 65 78 74 | 0d 04 1a 12 20 f4 20 43 |50:.Text|.... . C|
|000006f0| 61 6c 63 75 6c 61 74 69 | 6f 6e 0d 04 24 05 20 0d |alculati|on..$. .|
|00000700| 04 2e 10 20 52 3d 30 3a | 49 3d 30 3a 55 3d 30 0d |... R=0:|I=0:U=0.|
|00000710| 04 38 28 20 f1 20 22 4c | 65 6e 67 74 68 20 6f 66 |.8( . "L|ength of|
|00000720| 20 62 61 73 65 22 3b 3a | e8 20 58 3a e7 58 3d 30 | base";:|. X:.X=0|
|00000730| 8c 20 e5 8d 54 78 44 0d | 04 42 0d 20 e3 54 3d 31 |. ..TxD.|.B. .T=1|
|00000740| 20 b8 20 58 0d 04 4c 0a | 20 52 3d 52 2b 54 0d 04 | . X..L.| R=R+T..|
|00000750| 56 0c 20 51 28 54 29 3d | 52 3a 0d 04 60 06 20 ed |V. Q(T)=|R:..`. .|
|00000760| 0d 04 6a 16 20 e3 54 3d | 31 b8 58 3a 55 3d 55 2b |..j. .T=|1.X:U=U+|
|00000770| 51 28 54 29 3a ed 0d 04 | 74 16 20 e7 20 58 20 83 |Q(T):...|t. . X .|
|00000780| 20 32 20 3d 30 20 8c 20 | f2 4f 64 64 0d 04 7e 18 | 2 =0 . |.Odd..~.|
|00000790| 20 e7 20 58 20 83 20 32 | 3e 3d 31 20 8c 20 20 f2 | . X . 2|>=1 .  .|
|000007a0| 45 76 65 6e 0d 04 83 15 | 20 e8 20 22 41 6e 6f 74 |Even....| . "Anot|
|000007b0| 68 65 72 20 22 3b 61 6e | 24 0d 04 84 16 20 e7 20 |her ";an|$.... . |
|000007c0| 61 6e 24 3d 22 59 22 20 | 8c 20 e5 8d 54 6e 44 0d |an$="Y" |. ..TnD.|
|000007d0| 04 85 12 20 e7 20 61 6e | 24 3d 22 4e 22 20 8c 20 |... . an|$="N" . |
|000007e0| e1 0d 04 88 06 20 3a 0d | 04 92 0a 20 dd f2 4f 64 |..... :.|... ..Od|
|000007f0| 64 0d 04 9c 0b 20 e3 54 | 3d 31 b8 58 0d 04 a6 1b |d.... .T|=1.X....|
|00000800| 20 e7 20 54 20 83 20 32 | 20 3e 3d 31 8c 20 49 3d | . T . 2| >=1. I=|
|00000810| 49 2b 51 28 54 29 3a 0d | 04 b0 06 20 ed 0d 04 ba |I+Q(T):.|... ....|
|00000820| 20 20 f1 22 4e 75 6d 62 | 65 72 20 6f 66 20 54 72 |  ."Numb|er of Tr|
|00000830| 69 6e 67 6c 65 73 20 3a | 22 3b 49 2b 55 0d 04 c4 |ingles :|";I+U...|
|00000840| 06 20 e1 0d 05 13 05 3a | 0d 05 14 0b 20 dd f2 45 |. .....:|.... ..E|
|00000850| 76 65 6e 0d 05 1e 0b 20 | e3 54 3d 31 b8 58 0d 05 |ven.... |.T=1.X..|
|00000860| 28 1b 20 e7 20 54 20 83 | 20 32 20 3d 30 20 8c 20 |(. . T .| 2 =0 . |
|00000870| 49 3d 49 2b 51 28 54 29 | 3a 0d 05 32 06 20 ed 0d |I=I+Q(T)|:..2. ..|
|00000880| 05 3c 20 20 f1 22 4e 75 | 6d 62 65 72 20 6f 66 20 |.<  ."Nu|mber of |
|00000890| 54 72 69 6e 67 6c 65 73 | 20 3a 22 3b 49 2b 55 0d |Tringles| :";I+U.|
|000008a0| 05 46 06 20 e1 0d 05 77 | 05 3a 0d 13 87 06 20 e0 |.F. ...w|.:.... .|
|000008b0| 0d 13 88 0d 20 dd f2 43 | 65 6e 74 72 65 0d 13 92 |.... ..C|entre...|
|000008c0| 0c 20 e3 54 3d 31 b8 31 | 35 0d 13 9c 1e 20 54 65 |. .T=1.1|5.... Te|
|000008d0| 78 74 28 54 29 3d 34 30 | 2d 2e 35 2a a9 28 54 65 |xt(T)=40|-.5*.(Te|
|000008e0| 78 74 24 28 54 29 29 0d | 13 a6 06 20 ed 0d 13 b0 |xt$(T)).|... ....|
|000008f0| 06 20 e1 0d 13 ba 0b 20 | dd f2 54 65 78 74 0d 13 |. ..... |..Text..|
|00000900| c4 13 20 ef 20 32 38 2c | 37 2c 31 30 2c 33 35 2c |.. . 28,|7,10,35,|
|00000910| 32 0d 13 ce 06 20 e1 0d | ff                      |2.... ..|.       |
+--------+-------------------------+-------------------------+--------+--------+