163. Qbasic sequential file handling to display detail of all depositors including simple interest.

163.A sequential data file named “nabil.txt” contains record of clients of a bank including depositor’s name, deposited amount, time and rate of interest. Wap to display detail of all depositors including simple interest.

OPEN "NABIL.TXT" FOR INPUT AS #1

CLS

WHILE NOT EOF (1)

  INPUT #1, N$, P, T, R

I=P*T*R/100

PRINT A$, B$, C, I

WEND

CLOSE #1

END