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

Crazygirl

Fri Nov 15, 2002 2:35 am


plz help

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

hello
plz help me again  :cry:  :cry: 
im in trouble with these program:-


program no 1 
Ask  the user for a series of firstnames,lastnames,and marks(x,x,or negative mark to exit ; max 30 records).write these to files1.dat
open files 1.dat to see how the data appears in the file.


thank you  very much
 :)   :lol: [/u]


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

Tony

Fri Nov 15, 2002 3:09 am



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

well it should be something along those lines:


var name : array 1..10 as string
var lastname : array 1..10 as string
var mark: array 1..10, 1..30 as double
var ans : char(1)

loop
counter += 1

get name(counter)
get lastname(counter)

loop
markcounter +=1
get mark(markcounter)
exit when mark(markcounter)