A data file 'salary.doc' has 100 records that contain employee's name, address, post & salary. Print the number of records where salary >= 2000.
OPEN "salary.doc" FOR INPUT AS #1 CLS PRINT "Name", "Address", "Post", "Salary" DO WHILE NOT EOF (1) INPUT #1, n$, a$, p$, s IF s >= 2000 THEN PRINT n$, a$, p$, s LOOP CLOSE #1 END