18 lines
402 B
Plaintext
18 lines
402 B
Plaintext
10 ' Multiplication Tables
|
|
20 LET N% = 12
|
|
30 FOR J% = 1 TO N% - 1
|
|
40 PRINT USING "###"; J%;
|
|
50 PRINT " ";
|
|
60 NEXT J%
|
|
70 PRINT USING "###"; N%
|
|
80 FOR J% = 0 TO N% - 1
|
|
90 PRINT "----";
|
|
100 NEXT J%
|
|
110 PRINT "+"
|
|
120 FOR I% = 1 TO N%
|
|
130 FOR J% = 1 TO N%
|
|
140 IF J% < I% THEN PRINT " "; ELSE PRINT USING "###"; I% * J%;: PRINT " ";
|
|
150 NEXT J%
|
|
160 PRINT "| "; USING "##"; I%
|
|
170 NEXT I%
|