5 REM TEST FOR INTEGER MATH OPERATOR
6 REM USE EXTENDED MODE FEATURES
10 PRINT "MOD OPERATOR"
20 LET A=9
30 LET B=7
40 PRINT A;"MOD";B;"=";(A MOD B)
50 LET A=-9
60 LET B=7
70 PRINT A;"MOD";B;"=";(A MOD B)
80 LET A=9
90 LET B=-7
100 PRINT A;"MOD";B;"=";(A MOD B)
110 LET A=-9
120 LET B=-7
130 PRINT A;"MOD";B;"=";(A MOD B)
210 PRINT "INTEGER DIVISION OPERATOR"
220 LET A=9
230 LET B=7
240 PRINT A;"\";B;"=";(A \ B)
250 LET A=-9
260 LET B=7
270 PRINT A;"\";B;"=";(A \ B)
280 LET A=9
290 LET B=-7
300 PRINT A;"\";B;"=";(A \ B)
310 LET A=-9
320 LET B=-7
330 PRINT A;"\";B;"=";(A \ B)
410 PRINT "NORMAL DIVISION OPERATOR TURNED TO INT"
420 LET A=9
430 LET B=7
440 PRINT A;"/";B;"=";INT(A/B)
450 LET A=-9
460 LET B=7
470 PRINT A;"/";B;"=";INT(A/B)
480 LET A=9
490 LET B=-7
500 PRINT A;"/";B;"=";INT(A/B)
510 LET A=-9
520 LET B=-7
530 PRINT A;"/";B;"=";INT(A/B)
600 END

