REM Author; Sangha, Suky
REM Date of Coding: 10.07.02
REM Assignment name: salary_arr.bas

DIM name1 AS STRING
DIM salary(10) AS INTEGER
DIM names(10) AS STRING
CLS
index = 0
PRINT "What is your Name"
INPUT name1
DO UNTIL name1 = "zzz"
	index = index + 1
	names(index) = name1
	PRINT "What is your Salary"
	INPUT salary(index)
	PRINT "What is your Name"
	INPUT name1
LOOP

REM OUTPUT headings
FOR counter = 1 TO index
contribution = .1 * salary(counter)
PRINT names(counter), salary(counter), contribution
NEXT