*** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT PRINT AS -1.23456E+32' *** *** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT PRINT AS '1.23456E-24' *** -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 *** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT PRINT AS '-1.23456E-24' *** END TEST. SECTION 10.6: MISCELLANEOUS NR3 CONSTANTS. ON OUTPUT, TRAILING ZEROS MAY BE OMITTED IN THE FRACTIONAL *** TEST PASSED IF ACTUAL OUTPUT MATCHES OUTPUT AS IT SHOULD BE (ALLOWING FOR OPTIONAL TRAILING ZEROS IN THE SIGNIFICAND AND LEADING ZEROS IN THE EXRAD *** END TEST. SECTION 10.7: NR3 CONSTANTS SEPARATED BY COMMAS TO PRODUCE TABULAR OUTPUT. BEGIN TEST. *** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT PRINT AS -1.23456E+32' *** *** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT PRINT AS '1.23456E-24' *** -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 -1.23456E-24 *** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT PRINT AS '-1.23456E-24' *** END TEST. SECTION 10.6: MISCELLANEOUS NR3 CONSTANTS. ON OUTPUT, TRAILING ZEROS MAY BE OMITTED IN THE FRACTIONAL A PERIOD IN THE SIGNIFICAND AND A SIGN FOLLOWING THE E. *** TEST PASSED IF ACTUAL OUTPUT MATCHES OUTPUT AS IT SHOULD BE (ALLOWING FOR OPTIONAL TRAILING ZEROS IN THE SIGNIFICAND AND LEADING ZEROS IN THE EXRAD *** END TEST. SECTION 10.7: NR3 CONSTANTS SEPARATED BY COMMAS TO PRODUCE TABULAR OUTPUT. BEGIN TEST. *** TEST PASSED IF THE FIRST THREE PRINT ZONES EACH CONTAIN A COLUMN OF NR3 NUMBERS *** END TEST. SECTION 10.8: WIDTH FOR PRINTED E-FORMAT CONSTANTS THE SPACE FOR THE CONSTANT IS DELIMITED BY ASTERISKS. BEGIN TEST. 000000000111111111122222222223333333333444444444455555555556666666666777 123456789012345678901234567890123456789012345678901234567890123456789012 * 1.23456E+32 * *-1.23456E+32 * * 1.23456E-32 * *-1.23456E-32 * * 1.23456E+31 * *** TEST PASSED IF THE CONSTANTS ABOVE ARE PRECEDED BY A SPACE OR A MINUS AND ARE FOLLOWED BY A SPACE *** END PROGRAM 10 **** **** ** END TEST. 10 PRINT "PROGRAM FILE 11: PRINTING NUMERIC VARIABLES ASSIGNED" 20 PRINT " ANSI STANDARD 5.2, 5.4, 6.2, 6.4, 9.2, 9.4, 12.4" 70 PRINT 80 PRINT "SECTION 11.1: PRINTING VARIABLES WHICH HAVE BEEN ASSIGNED" 85 PRINT " 90 PRINT INTEGER (NR 1) CONSTANTS." BEGIN TEST." 110 PRINT 310 LET M2=+2 320 LET L2=-3 330 LET N2=-998765 340 LET 02=+6912 342 LET M1=1 344 LET J1=12345 346 LET K1=000 350 PRINT "ASSIGNED","OUTPUT","ACTUAL" 360 PRINT "CONSTANT","SHOULD BE","OUTPUT" 370 PRINT |