bwBASIC/NBS2/P130.run

PROGRAM FILE 130: RND FUNCTION WITHOUT RANDOMIZE STATEMENT.                     
    ANSI STANDARD 8.2, 8.4                                                      
                                                                                
SECTION 130.1: RND FUNCTION WITHOUT RANDOMIZE STATEMENT.                        
                                                                                
THE FOLLOWING 20 NUMBERS SHOULD BE THE IMPLEMENTATION-                          
DEFINED SEQUENCE OF PSEUDO-RANDOM NUMBERS FOR THE                               
RND FUNCTION.                                                                   
                                                                                
             BEGIN TEST                                                         
                                                                                
POSITION       VALUE                                                            
 1              .396465                                                         
 2              .840485                                                         
 3              .353336                                                         
 4              .446583                                                         
 5              .318693                                                         
 6              .886428                                                         
 7              1.55828E-2                                                      
 8              .58409                                                          
 9              .159369                                                         
 10             .383716                                                         
 11             .691004                                                         
 12             5.88589E-2                                                      
 13             .899854                                                         
 14             .163546                                                         
 15             .159072                                                         
 16             .533065                                                         
 17             .604144                                                         
 18             .582699                                                         
 19             .269971                                                         
 20             .390478                                                         
                                                                                
TO DETERMINE WHETHER THIS TEST PASSES OR FAILS, THE USER                        
MUST RUN THE TEST THREE TIMES, NOTHING THE SEQUENCE OF                          
NUMBERS PRODUCED EACH TIME. IF ALL THREE ARE IDENTICAL,                         
***  TEST PASSED  ***                                                           
                                                                                
             END TEST                                                           
                                                                                
END PROGRAM 130