bwBASIC/NBS2/P092.run

PROGRAM FILE 92: READ AND DATA STATEMENTS FOR NUMERIC DATA.                     
    ANSI STANDARD 5.2, 14.2, 14.4                                               
                                                                                
SECTION 92.1: READ AND DATA STATEMENTS FOR NUMERIC DATA.                        
                                                                                
THIS SECTION TESTS THE PROCESSOR'S CAPABILITY TO HANDLE                         
INTERNAL NUMERIC DATA USING THE DATA AND READ STATEMENTS.                       
THE DATA-VALUES WILL BE COMPARED TO THOSE ASSIGNED TO AN                        
ARRAY AND THE RESULTS DISPLAYED. IF THE ACCURACY IS LESS                        
THAN SIX DIGITS, THE TEST WILL BE COUNTED AS A FAILURE.                         
                                                                                
                BEGIN TEST                                                      
                                                                                
TRAIL #        DATA VALUE     RESULTS                                           
 1              9.99999E+37    OK                                               
 2             -9.99999E+37    OK                                               
 3              9.87654E+37    OK                                               
 4              9.87654E-38    OK                                               
 5              1.00001E-38    OK                                               
 6             -1.00001E-38    OK                                               
 7              9.99999E-38    OK                                               
 8              123.456        OK                                               
 9              123.456        OK                                               
 10             9.87654E+37    OK                                               
 11             123456         OK                                               
 12             123456         OK                                               
 13             123456         OK                                               
 14             987.654        OK                                               
 15             1.23456E+6     OK                                               
 16             1.23456E+8     OK                                               
 17             1.23456E-2     OK                                               
 18             1.23456E-4     OK                                               
 19             .12            OK                                               
 20             .12            OK                                               
 21            -.12            OK                                               
 22             .12            OK                                               
 23             0              OK                                               
 24             0              OK                                               
 25             0              OK                                               
 26             1.23E+9        OK                                               
 27             1.23E+9        OK                                               
 28             1.23E+9        OK                                               
 29             1.23E-9        OK                                               
 30             1.23E-9        OK                                               
 31             1.23E-9        OK                                               
 32             1.23E-9        OK                                               
 33             0              OK                                               
 34             0              OK                                               
 35             0              OK                                               
 36             0              OK                                               
 37             123            OK                                               
 38             123            OK                                               
 39             123            OK                                               
 40             123            OK                                               
 41             1.23457E+19    OK                                               
 42             1.23456E+15    OK                                               
 43             1.23456E-15    OK                                               
 44             123456.        OK                                               
 45             123456         OK                                               
                                                                                
***** TEST PASSED *****                                                         
                                                                                
                  END TEST                                                      
                                                                                
END PROGRAM 92