� 7
�copies
� Cake$(12)
(� Name$(10)
-� NAME$(10)
2� Quest$(6)
< � Price(12)
FQN=0
P�
ZQN=QN+1
d
�Setup
n�Message
xN=0
��
�	N=N+1
�	�init
�
�print
�
� N=13
�� QN=QC
� 
��
� 
� 
� 
� 
� 

��copies

+�''"�How many copies do you want?�  "QC

�

"�

, 

6��Setup

@� X=1 � 12

J � Cake$(X)

T Price(X)=�(20)

^� X

h� Y=1 � 10

r � Name$(Y)

w � NAME$(Y)

|� Y

�
� Z=1 � 6

� � Quest$(Z)

�� Z

��

��

� 

� 

�
��Message

��2

�� �10)QN;:� �65)QN

֑�'"These are money problems."'"Read them carefully and answer them."''"THE BAKER'S SHOP ----- PRICE LIST"'"---------------------------------"

�J=0

� � I=1 � 6

� � H=1 � 2

�	J=J+1

�)� Cake$(J);" - ";Price(J);"p each, ";

�� H
	�'"";
� I
�
�3
�
& 
0 
: 
D 
N 
X
��init
b a=�(12):b=�(12):c=�(12)
l#� a=b � a=c � b=c � �DbB � �DvB
vn=�(10):nn=�(10):q=�(6)
�M=�(4):L=�(3):K=�(3)
�� M=1 � L=1 � K=1 � �t@B
�/Cost=(Price(a)*K)+(Price(b)*L)+(Price(c)*M)
�"� Cost<100 � Money=1 � Money=2
�Answer=(Money*100)-Cost
��
� 
� 
� 
� 
���print
��2
�S � Name$(n);" and ";NAME$(nn);" had #";Money;". They went shopping and brought"
�D�;K;" ";Cake$(a);", ";;L;" ";Cake$(b);" and ";M;" ";Cake$(c);"."
�1 � Quest$(q);"  ________p";:� �65)Answer;"p"'
��3
��
'J� "Loaves of Bread","Cream Doughnuts","Cream Fancies","Coconut Slices"
*�/� "Sliced Loaves","Apple Pies",Buns,Eclairs
.�A� "Chocolate Slices","Belgian Buns","Mince Pies","Fruit Cake"
2�/� Christopher,Katherine,Louise,Douglas,Ruth
4�'� Alison,Katie,Susan,Christine,John
6�)� James,Michelle,Shony,Siobhan,Rachel
8�(� Michael,Jonathan,Richard,Paul,Carl
:�$�"How much change do they have?"
:�-�"How much money do they have left over?"
;`$�"How much more can they spend?"
;�5�"How much change will the shopkeeper give them?"
<(+�"How much money should they get back?"
<�!�"What change will they get?"
�

00000000  0d 00 0a 07 eb 20 37 0d  00 14 0b f2 63 6f 70 69  |..... 7.....copi|
00000010  65 73 0d 00 1e 0f de 20  43 61 6b 65 24 28 31 32  |es..... Cake$(12|
00000020  29 0d 00 28 0f de 20 4e  61 6d 65 24 28 31 30 29  |)..(.. Name$(10)|
00000030  0d 00 2d 0f de 20 4e 41  4d 45 24 28 31 30 29 0d  |..-.. NAME$(10).|
00000040  00 32 0f de 20 51 75 65  73 74 24 28 36 29 0d 00  |.2.. Quest$(6)..|
00000050  3c 10 20 de 20 50 72 69  63 65 28 31 32 29 0d 00  |<. . Price(12)..|
00000060  46 08 51 4e 3d 30 0d 00  50 05 f5 0d 00 5a 0b 51  |F.QN=0..P....Z.Q|
00000070  4e 3d 51 4e 2b 31 0d 00  64 0a f2 53 65 74 75 70  |N=QN+1..d..Setup|
00000080  0d 00 6e 0c f2 4d 65 73  73 61 67 65 0d 00 78 07  |..n..Message..x.|
00000090  4e 3d 30 0d 00 82 05 f5  0d 00 8c 09 4e 3d 4e 2b  |N=0.........N=N+|
000000a0  31 0d 00 96 09 f2 69 6e  69 74 0d 00 a0 0a f2 70  |1.....init.....p|
000000b0  72 69 6e 74 0d 00 aa 0a  fd 20 4e 3d 31 33 0d 00  |rint..... N=13..|
000000c0  b4 0b fd 20 51 4e 3d 51  43 0d 00 be 05 20 0d 00  |... QN=QC.... ..|
000000d0  c8 05 e0 0d 00 d2 05 20  0d 00 dc 05 20 0d 00 e6  |....... .... ...|
000000e0  05 20 0d 00 f0 05 20 0d  00 fa 05 20 0d 01 04 0c  |. .... .... ....|
000000f0  dd f2 63 6f 70 69 65 73  0d 01 0e 2b e8 27 27 22  |..copies...+.''"|
00000100  81 48 6f 77 20 6d 61 6e  79 20 63 6f 70 69 65 73  |.How many copies|
00000110  20 64 6f 20 79 6f 75 20  77 61 6e 74 3f 82 20 20  | do you want?.  |
00000120  22 51 43 0d 01 18 05 db  0d 01 22 05 e1 0d 01 2c  |"QC......."....,|
00000130  05 20 0d 01 36 0b dd f2  53 65 74 75 70 0d 01 40  |. ..6...Setup..@|
00000140  0e e3 20 58 3d 31 20 b8  20 31 32 0d 01 4a 0f 20  |.. X=1 . 12..J. |
00000150  f3 20 43 61 6b 65 24 28  58 29 0d 01 54 13 20 50  |. Cake$(X)..T. P|
00000160  72 69 63 65 28 58 29 3d  b3 28 32 30 29 0d 01 5e  |rice(X)=.(20)..^|
00000170  07 ed 20 58 0d 01 68 0e  e3 20 59 3d 31 20 b8 20  |.. X..h.. Y=1 . |
00000180  31 30 0d 01 72 0f 20 f3  20 4e 61 6d 65 24 28 59  |10..r. . Name$(Y|
00000190  29 0d 01 77 0f 20 f3 20  4e 41 4d 45 24 28 59 29  |)..w. . NAME$(Y)|
000001a0  0d 01 7c 07 ed 20 59 0d  01 86 0d e3 20 5a 3d 31  |..|.. Y..... Z=1|
000001b0  20 b8 20 36 0d 01 90 10  20 f3 20 51 75 65 73 74  | . 6.... . Quest|
000001c0  24 28 5a 29 0d 01 9a 07  ed 20 5a 0d 01 9f 05 f7  |$(Z)..... Z.....|
000001d0  0d 01 a4 05 e1 0d 01 ae  05 20 0d 01 b8 05 20 0d  |......... .... .|
000001e0  01 c2 0d dd f2 4d 65 73  73 61 67 65 0d 01 c3 06  |.....Message....|
000001f0  ef 32 0d 01 cc 16 f1 20  8a 31 30 29 51 4e 3b 3a  |.2..... .10)QN;:|
00000200  f1 20 8a 36 35 29 51 4e  0d 01 d6 91 f1 27 22 54  |. .65)QN.....'"T|
00000210  68 65 73 65 20 61 72 65  20 6d 6f 6e 65 79 20 70  |hese are money p|
00000220  72 6f 62 6c 65 6d 73 2e  22 27 22 52 65 61 64 20  |roblems."'"Read |
00000230  74 68 65 6d 20 63 61 72  65 66 75 6c 6c 79 20 61  |them carefully a|
00000240  6e 64 20 61 6e 73 77 65  72 20 74 68 65 6d 2e 22  |nd answer them."|
00000250  27 27 22 54 48 45 20 42  41 4b 45 52 27 53 20 53  |''"THE BAKER'S S|
00000260  48 4f 50 20 2d 2d 2d 2d  2d 20 50 52 49 43 45 20  |HOP ----- PRICE |
00000270  4c 49 53 54 22 27 22 2d  2d 2d 2d 2d 2d 2d 2d 2d  |LIST"'"---------|
00000280  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
00000290  2d 2d 2d 2d 2d 2d 2d 2d  22 0d 01 db 07 4a 3d 30  |--------"....J=0|
000002a0  0d 01 e0 0e 20 e3 20 49  3d 31 20 b8 20 36 0d 01  |.... . I=1 . 6..|
000002b0  ea 0e 20 e3 20 48 3d 31  20 b8 20 32 0d 01 ef 09  |.. . H=1 . 2....|
000002c0  4a 3d 4a 2b 31 0d 01 f4  29 f1 20 43 61 6b 65 24  |J=J+1...). Cake$|
000002d0  28 4a 29 3b 22 20 2d 20  22 3b 50 72 69 63 65 28  |(J);" - ";Price(|
000002e0  4a 29 3b 22 70 20 65 61  63 68 2c 20 22 3b 0d 01  |J);"p each, ";..|
000002f0  fe 07 ed 20 48 0d 02 03  09 f1 27 22 22 3b 0d 02  |... H.....'"";..|
00000300  08 07 ed 20 49 0d 02 12  05 f1 0d 02 13 06 ef 33  |... I..........3|
00000310  0d 02 1c 05 e1 0d 02 26  05 20 0d 02 30 05 20 0d  |.......&. ..0. .|
00000320  02 3a 05 20 0d 02 44 05  20 0d 02 4e 05 20 0d 02  |.:. ..D. ..N. ..|
00000330  58 0a dd f2 69 6e 69 74  0d 02 62 1c 20 61 3d b3  |X...init..b. a=.|
00000340  28 31 32 29 3a 62 3d b3  28 31 32 29 3a 63 3d b3  |(12):b=.(12):c=.|
00000350  28 31 32 29 0d 02 6c 23  e7 20 61 3d 62 20 84 20  |(12)..l#. a=b . |
00000360  61 3d 63 20 84 20 62 3d  63 20 8c 20 8d 44 62 42  |a=c . b=c . .DbB|
00000370  20 8b 20 8d 44 76 42 0d  02 76 1b 6e 3d b3 28 31  | . .DvB..v.n=.(1|
00000380  30 29 3a 6e 6e 3d b3 28  31 30 29 3a 71 3d b3 28  |0):nn=.(10):q=.(|
00000390  36 29 0d 02 80 18 4d 3d  b3 28 34 29 3a 4c 3d b3  |6)....M=.(4):L=.|
000003a0  28 33 29 3a 4b 3d b3 28  33 29 0d 02 81 1c e7 20  |(3):K=.(3)..... |
000003b0  4d 3d 31 20 84 20 4c 3d  31 20 84 20 4b 3d 31 20  |M=1 . L=1 . K=1 |
000003c0  8c 20 8d 74 40 42 0d 02  82 2f 43 6f 73 74 3d 28  |. .t@B.../Cost=(|
000003d0  50 72 69 63 65 28 61 29  2a 4b 29 2b 28 50 72 69  |Price(a)*K)+(Pri|
000003e0  63 65 28 62 29 2a 4c 29  2b 28 50 72 69 63 65 28  |ce(b)*L)+(Price(|
000003f0  63 29 2a 4d 29 0d 02 83  22 e7 20 43 6f 73 74 3c  |c)*M)...". Cost<|
00000400  31 30 30 20 8c 20 4d 6f  6e 65 79 3d 31 20 8b 20  |100 . Money=1 . |
00000410  4d 6f 6e 65 79 3d 32 0d  02 84 1b 41 6e 73 77 65  |Money=2....Answe|
00000420  72 3d 28 4d 6f 6e 65 79  2a 31 30 30 29 2d 43 6f  |r=(Money*100)-Co|
00000430  73 74 0d 02 8a 05 e1 0d  02 94 05 20 0d 02 9e 05  |st......... ....|
00000440  20 0d 02 a8 05 20 0d 02  b2 05 20 0d 02 bc 0b dd  | .... .... .....|
00000450  f2 70 72 69 6e 74 0d 02  bd 06 ef 32 0d 02 c6 53  |.print.....2...S|
00000460  20 f1 20 4e 61 6d 65 24  28 6e 29 3b 22 20 61 6e  | . Name$(n);" an|
00000470  64 20 22 3b 4e 41 4d 45  24 28 6e 6e 29 3b 22 20  |d ";NAME$(nn);" |
00000480  68 61 64 20 23 22 3b 4d  6f 6e 65 79 3b 22 2e 20  |had #";Money;". |
00000490  54 68 65 79 20 77 65 6e  74 20 73 68 6f 70 70 69  |They went shoppi|
000004a0  6e 67 20 61 6e 64 20 62  72 6f 75 67 68 74 22 0d  |ng and brought".|
000004b0  02 d0 44 f1 3b 4b 3b 22  20 22 3b 43 61 6b 65 24  |..D.;K;" ";Cake$|
000004c0  28 61 29 3b 22 2c 20 22  3b 3b 4c 3b 22 20 22 3b  |(a);", ";;L;" ";|
000004d0  43 61 6b 65 24 28 62 29  3b 22 20 61 6e 64 20 22  |Cake$(b);" and "|
000004e0  3b 4d 3b 22 20 22 3b 43  61 6b 65 24 28 63 29 3b  |;M;" ";Cake$(c);|
000004f0  22 2e 22 0d 02 da 31 20  f1 20 51 75 65 73 74 24  |"."...1 . Quest$|
00000500  28 71 29 3b 22 20 20 5f  5f 5f 5f 5f 5f 5f 5f 70  |(q);"  ________p|
00000510  22 3b 3a f1 20 8a 36 35  29 41 6e 73 77 65 72 3b  |";:. .65)Answer;|
00000520  22 70 22 27 0d 02 db 06  ef 33 0d 02 e4 05 e1 0d  |"p"'.....3......|
00000530  27 10 4a dc 20 22 4c 6f  61 76 65 73 20 6f 66 20  |'.J. "Loaves of |
00000540  42 72 65 61 64 22 2c 22  43 72 65 61 6d 20 44 6f  |Bread","Cream Do|
00000550  75 67 68 6e 75 74 73 22  2c 22 43 72 65 61 6d 20  |ughnuts","Cream |
00000560  46 61 6e 63 69 65 73 22  2c 22 43 6f 63 6f 6e 75  |Fancies","Coconu|
00000570  74 20 53 6c 69 63 65 73  22 0d 2a f8 2f dc 20 22  |t Slices".*./. "|
00000580  53 6c 69 63 65 64 20 4c  6f 61 76 65 73 22 2c 22  |Sliced Loaves","|
00000590  41 70 70 6c 65 20 50 69  65 73 22 2c 42 75 6e 73  |Apple Pies",Buns|
000005a0  2c 45 63 6c 61 69 72 73  0d 2e e0 41 dc 20 22 43  |,Eclairs...A. "C|
000005b0  68 6f 63 6f 6c 61 74 65  20 53 6c 69 63 65 73 22  |hocolate Slices"|
000005c0  2c 22 42 65 6c 67 69 61  6e 20 42 75 6e 73 22 2c  |,"Belgian Buns",|
000005d0  22 4d 69 6e 63 65 20 50  69 65 73 22 2c 22 46 72  |"Mince Pies","Fr|
000005e0  75 69 74 20 43 61 6b 65  22 0d 32 c8 2f dc 20 43  |uit Cake".2./. C|
000005f0  68 72 69 73 74 6f 70 68  65 72 2c 4b 61 74 68 65  |hristopher,Kathe|
00000600  72 69 6e 65 2c 4c 6f 75  69 73 65 2c 44 6f 75 67  |rine,Louise,Doug|
00000610  6c 61 73 2c 52 75 74 68  0d 34 bc 27 dc 20 41 6c  |las,Ruth.4.'. Al|
00000620  69 73 6f 6e 2c 4b 61 74  69 65 2c 53 75 73 61 6e  |ison,Katie,Susan|
00000630  2c 43 68 72 69 73 74 69  6e 65 2c 4a 6f 68 6e 0d  |,Christine,John.|
00000640  36 b0 29 dc 20 4a 61 6d  65 73 2c 4d 69 63 68 65  |6.). James,Miche|
00000650  6c 6c 65 2c 53 68 6f 6e  79 2c 53 69 6f 62 68 61  |lle,Shony,Siobha|
00000660  6e 2c 52 61 63 68 65 6c  0d 38 a4 28 dc 20 4d 69  |n,Rachel.8.(. Mi|
00000670  63 68 61 65 6c 2c 4a 6f  6e 61 74 68 61 6e 2c 52  |chael,Jonathan,R|
00000680  69 63 68 61 72 64 2c 50  61 75 6c 2c 43 61 72 6c  |ichard,Paul,Carl|
00000690  0d 3a 98 24 dc 22 48 6f  77 20 6d 75 63 68 20 63  |.:.$."How much c|
000006a0  68 61 6e 67 65 20 64 6f  20 74 68 65 79 20 68 61  |hange do they ha|
000006b0  76 65 3f 22 0d 3a fc 2d  dc 22 48 6f 77 20 6d 75  |ve?".:.-."How mu|
000006c0  63 68 20 6d 6f 6e 65 79  20 64 6f 20 74 68 65 79  |ch money do they|
000006d0  20 68 61 76 65 20 6c 65  66 74 20 6f 76 65 72 3f  | have left over?|
000006e0  22 0d 3b 60 24 dc 22 48  6f 77 20 6d 75 63 68 20  |".;`$."How much |
000006f0  6d 6f 72 65 20 63 61 6e  20 74 68 65 79 20 73 70  |more can they sp|
00000700  65 6e 64 3f 22 0d 3b c4  35 dc 22 48 6f 77 20 6d  |end?".;.5."How m|
00000710  75 63 68 20 63 68 61 6e  67 65 20 77 69 6c 6c 20  |uch change will |
00000720  74 68 65 20 73 68 6f 70  6b 65 65 70 65 72 20 67  |the shopkeeper g|
00000730  69 76 65 20 74 68 65 6d  3f 22 0d 3c 28 2b dc 22  |ive them?".<(+."|
00000740  48 6f 77 20 6d 75 63 68  20 6d 6f 6e 65 79 20 73  |How much money s|
00000750  68 6f 75 6c 64 20 74 68  65 79 20 67 65 74 20 62  |hould they get b|
00000760  61 63 6b 3f 22 0d 3c 8c  21 dc 22 57 68 61 74 20  |ack?".<.!."What |
00000770  63 68 61 6e 67 65 20 77  69 6c 6c 20 74 68 65 79  |change will they|
00000780  20 67 65 74 3f 22 0d ff                           | get?"..|
00000788