40 PRINT "SECTION 53.1: ERROR - INTERLEAVED FOR-BLOCKS." 50 PRINT 60 PRINT "THIS IS A TEST FOR A NON-STANDARD FEATURE OF MINIMAL BASIC." 70 PRINT "TO PASS THIS TEST, THE PROCESSOR MUST EITHER:" 80 PRINT 90 PRINT " 1) ACCEPT THE PROGRAM AND BE ACCOMPANIED BY DOCUMENTATION" 110 PRINT 120 PRINT 130 PRINT " 2) REJECT THE PROGRAM WITH AN APPROPRIATE ERROR MESSAGE" 140 PRINT 150 PRINT "SEE THE NBS MINIMAL BASIC TEST PROGRAMS USER'S MANUAL" 160 PRINT "FOR DETAILED CRITERIA." 170 PRINT 180 PRINT " 190 PRINT 200 PRINT "ENTERING FOR-BLOCKS; LOOPS ARE:" BEGIN TEST." 205 PRINT "FOR I=1 TO 3 FOR J=1 TO 5/ NEXT I / NEXT J" 70 PRINT "THIS IS A TEST FOR A NON-STANDARD FEATURE OF MINIMAL BASIC." 100 PRINT " 1) ACCEPT THE PROGRAM AND BE ACCOMPANIED BY DOCUMENTATION" 120 PRINT " 130 PRINT 140 PRINT " 2) REJECT THE PROGRAM WITH AN APPROPRIATE ERROR MESSAGE" 150 PRINT 160 PRINT "SEE THE NBS MINIMAL BASIC TEST PROGRAMS USER'S MANUAL" 170 PRINT "FOR DETAILED CRITERIA." 180 PRINT 190 PRINT " 200 PRINT BEGIN TEST." 210 PRINT "ENTERING FOR-BLOCKS; LOOPS ARE:" 220 PRINT "FOR I=1 TO 3 FOR J=2 TO 4 / FOR I=3 TO 5/"; 230 PRINT "NEXT I / NEXT J / NEXT I" ? FOR USING PREVIOUS CONTROL-VARIABLE IN LINE 280 70 PRINT "THIS IS A TEST FOR A NON-STANDARD FEATURE OF MINIMAL BASIC." 80 PRINT "TO PASS THIS TEST, THE PROCESSOR MUST EITHER:" 90 PRINT 110 PRINT " 100 PRINT " 1) ACCEPT THE PROGRAM AND BE ACCOMPANIED BY DOCUMENTATION" 120 PRINT " 130 PRINT 140 PRINT " 150 PRINT 2) REJECT THE PROGRAM WITH AN APPROPRIATE ERROR MESSAGE" ** 160 PRINT "SEE THE NBS MINIMAL BASIC TEST PROGRAMS USER'S MANUAL" 170 PRINT "FOR DETAILED CRITERIA." 180 PRINT 190 PRINT " 192 PRINT "SETTING I = 5" 195 LET I=5 200 PRINT BEGIN TEST." 210 PRINT "ABOUT TO JUMP INTO FOR-BLOCK AROUND FOR-STATEMENT; 220 PRINT "LOOP IS: FOR I=1 TO 9 .. NEXT I" 240 PRINT 250 GOTO 270 260 FOR I=1 TO 9 10 PRINT "PROGRAM FILE 56: ARRAY ASSIGNMENT WITHOUT" 15 PRINT " THE OPTION-STATEMENT." 20 PRINT " ANSI STANDARD 6.2, 6.4, 9.2, 9.4, 15.2, 15.4′′ 30 PRINT 90 PRINT "SECTION 56.1: ONE-DIMENSIONAL ARRAYS WITHOUT THE" 95 PRINT 100 PRINT 110 PRINT " 120 PRINT 130 FOR I=0 TO 10 140 LET A(I)=I DIM-STATEMENT." BEGIN TEST." ****** ** |