173. Qbasic sequential file handling to display from 50th to 60th records.

173.A sequential data file has 100 records having field name, class and roll number. Write a program to display from 50^th to 60^th records.

OPEN "ABC.DAT" FOR INPUT AS #1

CLS

WHILE NOT EOF (1)

  INPUT #1, N$, C, R

D = D + 1   

IF D >= 50 AND D <= 60 THEN PRINT N$, C, R

WEND

CLOSE #1

END