1000.2       REM ************************
PRINT "THAT'S EXCELLENT! NEXT TIME LET'S TRY HARDER PROBLEMS."
       G=INT(C/N*100+.5)
PRINT N$;", YOUR GRADE FOR THIS EXERCISE IS ";G;"%"
OPEN "GRADE" AS 1
         TRUE% = -1
IF END #1 THEN 1000.3
         WHILE TRUE%
               READ #1;DUMMY$
         WEND
1000.3   PRINT #1;"///",G,N
         CLOSE 1
CHAIN "CHAIN"
         END