10  LET SUM = 0
 20  FOR RAINFALL = 1 TO 1E38
 30      INPUT "ENTER RAINFALL (AS AN INTEGER, OR 99999 TO QUIT): ";I
 40      IF I = 99999 THEN  END
 50      IF I <  >  INT (I) THEN  PRINT "?REENTER, MUST BE AN INTEGER": GOTO 30
 60      LET SUM = SUM + I
 70      PRINT "  THE NEW AVERAGE RAINFALL IS "SUM / RAINFALL
 80  NEXT RAINFALL