790 PRINT "*** TEST FAILED: VALUE SUPPLIED GREATER THAN MINIMUM" 800 PRINT " NEGATIVE MACHINE INFINITY. ***"1 810 GOTO 850 820 PRINT "LAST TWO MULTIPLICATIONS SHOULD HAVE BEEN REPORTED" 830 PRINT "AS OVERFLOW, AND NEGATIVE INFINITY SUPPLIED; IF SO," 840 PRINT "*** TEST PASSES *** OTHERWISE *** TEST FAILS *** " 850 PRINT THIS SECTION TESTS THE RESULT OF EXPRESSION EVALUATION TO PASS THIS TEST: 1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE 2) POSITIVE INFINITY MUST BE SUPPLIED AS THE VALUE BEGIN TEST LAST TWO MULTIPLICATIONS SHOULD HAVE BEEN REPORTED AS OVERFLOW, AND POSITIVE INFINITY SUPPLIED; IF SO, *** TEST PASSED *** OTHERWISE *** TEST FAILED *** END TEST SECTION 29.2: NEGATIVE OVERFLOW THIS SECTION TESTS THE RESULT OF EXPRESSION EVALUATION EXCEEDING NEGATIVE MACHINE INFINITY. TO PASS THIS TEST: 1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE 2) NEGATIVE INFINITY MUST BE SUPPLIED AS THE VALUE OF THE EXPRESSION AND EXECUTION CONTINUES. BEGIN TEST ABOUT TO COMPUTE -1.00000E+36 * 10 RESULT = 1.00000E+37 ABOUT TO COMPUTE -1.00000E+37 * 12.5893 LAST TWO MULTIPLICATIONS SHOULD HAVE BEEN REPORTED AS OVERFLOW, AND NEGATIVE INFINITY SUPPLIED; IF SO, *** TEST PASSES *** OTHERWISE *** TEST FAILS *** 40 PRINT "THIS PROGRAM TESTS VARIOUS CASES OF CONSTANT OVERFLOW." 50 PRINT 60 PRINT "SECTION 30.1: POSITIVE CONSTANT OVERFLOW" 70 PRINT 80 PRINT "THIS SECTION TESTS THE RESULT OF CONSTANT EVALUATION" 90 PRINT "EXCEEDING POSITIVE MACHINE INFINITY." 100 PRINT 110 PRINT "TO PASS THIS TEST:" 120 PRINT 130 PRINT " 140 PRINT " 150 PRINT 160 PRINT " 170 PRINT " 180 PRINT 190 PRINT " 200 PRINT 1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE" 2) POSITIVE INFINITY MUST BE SUPPLIED AS THE VALUE" OF THE CONSTANT AND EXECUTION CONTINUES." 360 LET A=3E99999 BEGIN TEST" 365 PRINT "RESULT OF ASSIGNING 3E99999 = ";A 370 IF A>.99E38 THEN 410 380 PRINT "*** TEST FAILED: VALUE SUPPLIED LESS THAN MINIMUM" 390 PRINT " 400 GOTO 440 POSITIVE MACHINE INFINITY. ***11 410 REM RESULT > MINIMUM 420 PRINT "IF (RESULT = 3E99999) OR " 425 PRINT " (RESULT = POSITIVE INFINITY AND EXCEPTION REPORTED)" 430 PRINT "*** TEST PASSED *** OTHERWISE *** TEST FAILED ***" 440 PRINT 470 PRINT "SECTION 30.2: NEGATIVE CONSTANT OVERFLOW" 480 PRINT 490 PRINT "THIS SECTION TESTS THE RESULT OF CONSTANT EVALUATION" 500 PRINT "EXCEEDING NEGATIVE MACHINE INFINITY." 510 PRINT 520 PRINT "TO PASS THIS TEST:" 530 PRINT 540 PRINT " 550 PRINT" 560 PRINT 570 PRINT " 580 PRINT " 590 PRINT 600 PRINT " 610 PRINT 1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE" 2) NEGATIVE INFINITY MUST BE SUPPLIED AS THE VALUE" OF THE CONSTANT AND EXECUTION CONTINUES." 770 LET A=-3E99999 BEGIN TEST" 775 PRINT "RESULT OF ASSIGNING -3E99999 = ";A 780 IF A<-.99E38 THEN 820 790 PRINT "*** TEST FAILED: VALUE SUPPLIED GREATER THAN MINIMUM" 800 PRINT " 810 GOTO 850 NEGATIVE MACHINE INFINITY. ***11 820 REM RESULT < MAXIMUM 830 PRINT "IF (RESULT = -3E99999) OR " 835 PRINT " (RESULT = NEGATIVE INFINITY AND EXCEPTION REPORTED)" 840 PRINT "*** TEST PASSES *** OTHERWISE *** TEST FAILS *** " THIS SECTION TESTS THE RESULT OF CONSTANT EVALUATION TO PASS THIS TEST: 1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE DISPLAYED, AND 2) POSITIVE INFINITY MUST BE SUPPLIED AS THE VALUE OF THE CONSTANT AND EXECUTION CONTINUES. (RESULT = POSITIVE INFINITY AND EXCEPTION REPORTED) *** TEST PASSED *** OTHERWISE *** TEST FAILED *** END TEST SECTION 30.2: NEGATIVE CONSTANT OVERFLOW THIS SECTION TESTS THE RESULT OF CONSTANT EVALUATION TO PASS THIS TEST: 1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE DISPLAYED, AND 2) NEGATIVE INFINITY MUST BE SUPPLIED AS THE VALUE OF THE CONSTANT AND EXECUTION CONTINUES. BEGIN TEST % OVERFLOW IN LINE 770 RESULT OF ASSIGNING -3E99999 = -1.70141E+38 IF (RESULT = -3E99999) OR (RESULT = NEGATIVE INFINITY AND EXCEPTION REPORTED) *** TEST PASSES *** OTHERWISE *** TEST FAILS *** END PROGRAM 30 END TEST 10 PRINT "PROGRAM FILE 31: EXCEPTION - ZERO RAISED TO A NEGATIVE POWER." 20 PRINT " ANSI STANDARD 7.5" 50 PRINT 60 PRINT "SECTION 31.1: EXCEPTION - ZERO RAISED TO A NEGATIVE POWER." 100 PRINT 110 PRINT "TO PASS THIS TEST:" 120 PRINT 130 PRINT " 140 PRINT " 150 PRINT 160 PRINT " 170 PRINT " 180 PRINT 1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE" 2) POSITIVE INFINITY MUST BE SUPPLIED AS THE VALUE" 黃黃 |