NBS Minimal BASIC Test Programs: Version 2, User's Manual, Volume 13 |
From inside the book
Results 1-5 of 100
Page 37
If the processor accepts the reply , the program then tests that six digits of accuracy have been preserved . If so , you will get a message that the test is OK , and may go on to the next reply . If not , you will get a message ...
If the processor accepts the reply , the program then tests that six digits of accuracy have been preserved . If so , you will get a message that the test is OK , and may go on to the next reply . If not , you will get a message ...
Page 62
1925 PRINT 1930 PRINT " END PROGRAM 18 " 1940 STOP 2000 REM SUBROUTINE TO TEST CONSTANT : VARIABLE 2005 LET B $ = " T # 1 2010 LET A $ = " T " 2020 LET L $ = " OK 2030 IF " ABC " < > T $ THEN 2060 2040 LET B $ = " F " 2050 GOTO 2080 ...
1925 PRINT 1930 PRINT " END PROGRAM 18 " 1940 STOP 2000 REM SUBROUTINE TO TEST CONSTANT : VARIABLE 2005 LET B $ = " T # 1 2010 LET A $ = " T " 2020 LET L $ = " OK 2030 IF " ABC " < > T $ THEN 2060 2040 LET B $ = " F " 2050 GOTO 2080 ...
Page 63
... FAILED " 3110 LET A $ = " F * " 3120 GOSUB 3900 3125 GOSUB 5000 3130 RETURN 3500 REM SUBROUTINE TO TEST VARIABLE < > CONSTANT 3505 LET A $ = " T * " 3510 LET B $ = " T " 3520 LET L $ = " OK 3530 IF T $ = " OX9 " THEN 3560 3540 LET A ...
... FAILED " 3110 LET A $ = " F * " 3120 GOSUB 3900 3125 GOSUB 5000 3130 RETURN 3500 REM SUBROUTINE TO TEST VARIABLE < > CONSTANT 3505 LET A $ = " T * " 3510 LET B $ = " T " 3520 LET L $ = " OK 3530 IF T $ = " OX9 " THEN 3560 3540 LET A ...
Page 64
CHARACTER STRINGS SHOULD TEST EQUAL IF AND ONLY IF THE STRINGS ARE EQUAL IN LENGTH AND CONTAIN IDENTICAL SEQUENCES OF CHARACTERS . BEGIN TEST . LEFT COMPARAND : RIGHT V / C : COMPARAND V / C = < > RESULT ABC C : ABC V F T OK ABC C : ABC ...
CHARACTER STRINGS SHOULD TEST EQUAL IF AND ONLY IF THE STRINGS ARE EQUAL IN LENGTH AND CONTAIN IDENTICAL SEQUENCES OF CHARACTERS . BEGIN TEST . LEFT COMPARAND : RIGHT V / C : COMPARAND V / C = < > RESULT ABC C : ABC V F T OK ABC C : ABC ...
Page 65
( NULL STRING ) UVWXYZ - *** TEST PASSED *** END PROGRAM 18 ** V : 0X9 C F T OK V : 0X9 CT F OK V : V F T OK V : ( NULL STRING ) V F T OK V : 18 CHARACTERS LONG V T F OK V 18 CHARACTERS LONK V F T OK V : ! # $ % & ' ( ) 0 = + * < > ?
( NULL STRING ) UVWXYZ - *** TEST PASSED *** END PROGRAM 18 ** V : 0X9 C F T OK V : 0X9 CT F OK V : V F T OK V : ( NULL STRING ) V F T OK V : 18 CHARACTERS LONG V T F OK V 18 CHARACTERS LONK V F T OK V : ! # $ % & ' ( ) 0 = + * < > ?
What people are saying - Write a review
We haven't found any reviews in the usual places.
Other editions - View all
Common terms and phrases
20 PRINT 40 PRINT SECTION ACCEPT THE PROGRAM ACCOMPANIED BY DOCUMENTATION ACCURACY ACTUAL ALLOWING ANSI STANDARD APPROPRIATE ERROR MESSAGE ARGUMENT ARRAY ASSIGNED BASIC TEST PROGRAMS BEGIN TEST CHARACTERS COLUMN COMPUTED CONSTANTS CONTAINING CONTROL DATA DIGITS DISPLAYED END PROGRAM FILE END TEST ENTER ERROR EVALUATION EXACT EXECUTION EXPECTED FOLLOWING FUNCTION GOSUB GOTO IDENTIFYING THE EXCEPTION implementation INFORMATIVE TEST INPUT INPUT-REPLY ITEM LINE LOOP MEASURE MESSAGE IDENTIFYING MINIMAL BASIC TEST NBS MINIMAL BASIC NEGATIVE NON-STANDARD FEATURE NOTE NUMERIC EXPRESSIONS OCCUR OK OK OK operations ORDER OUTPUT OVERFLOW PASS THIS TEST POSITIVE PRINT 40 PRINT PRINT END PROGRAM PRINT PROGRAM FILE PRINT THIS SECTION PRINT TO PASS PROCESSOR PROGRAM NUMBER PROGRAM TESTS READ REFERENCE REFS REJECT THE PROGRAM REPORTED RESULT RETURN RND FUNCTION SECTION TESTS SPACE STATEMENT STRING SUBSCRIPT SUPPLIED TERMINATE TEST FAILED TEST OK TEST PASSED TYPE UNDERFLOW VALUE VARIABLE ZERO ОК ОК ОК