step | name |
1. get information from player 1 | get_info |
2. get answer from player 2 | get_answer |
3. print appropriate message | message |
So the program looks like this just now: |
PROGRAM quiz;
{a quiz game} VAR BEGIN
{main program starts here} |
As before, though, if you try to compile this you'll get error messages because there are three procedures - get_info, get_answer and message - which we haven't yet coded. We'll now put in the first two of these and you can complete the other one yourself: |
PROGRAM quiz;
{a quiz game} VAR PROCEDURE
get_info; {information
from player 1} PROCEDURE
get_answer; {answer from player 2} {the other procedure goes in here} BEGIN
{main program} |