CLS
OPEN “RESULT.DAT” FOR OUTPUT AS #1
DO
INPUT “Enter name”; N$
INPUT “Enter class ”; C
INPUT “Enter section ”; S$
INPUT "Enter roll no. " N
WRITE #1, N$, C,S$,N
INPUT” Do you want to add more records (Y/N)”;CH$
LOOP WHILE CH$=”Y”
CLOSE #1
END
No comments:
Post a Comment