-----------------------------------

styxx

Fri May 06, 2005 1:39 pm


Prity easy, but cant figure it out!

-----------------------------------

Alright I have been trying to make this work but it does'nt seem to want to... its a simply phone book with a file called direct.t (with a bunch of names & numbers) that it opens and reads. Then once you type in the name of the person it should output the name & number but it doesnt work.

const maxEntries := 50
var name : array 1 .. maxEntries of string (20)

var phoneNumber : array 1 .. maxEntries of string (8)

var count : int := 0

var directory : int

open : directory, "direct.t", get



loop

    get : directory, skip
    exit when eof (directory)
    count := count + 1
    assert count