10 REM " THIS IS A PROGRAM TO AVERAGE GRADES"
  20 PRINT "DA GOLDSTEIN PROGF"
  30 PRINT "HOW MANY STUDENTS,HOW MANY GRADES / STUDENT";
  40 INPUT A,B
  50 LET I=0
  60 FOR J=I TO A-1
  70 LET V=0
  80 PRINT"STUDENT NUMBER=";J
  90 PRINT "ENTER THE GRADES"
 100 LET D=J
 110 FOR K=D TO D+(B-1)
 120 INPUT G
 130 LET V=V+G
 140 NEXT K
 150 LET V=V/B
 160 PRINT "AVERAGE GRADE=";V
 170 PRINT
 180 LET Q=Q+V
 190 NEXT J
 200 PRINT
 210 PRINT "CLASS AVERAGE =";Q/A
 220 STOP
 230 END