100 PROGRAM "Multipli.bas"
110 TEXT 80
120 PRINT TAB(7);
130 FOR I=1 TO 12
140   PRINT USING " ###":I;
150 NEXT
160 PRINT AT 2,5:"----------------------------------------------------"
170 FOR I=1 TO 12
180   PRINT USING "### |":I;:PRINT TAB(I*4+3);
190   FOR J=I TO 12
200     PRINT USING " ###":I*J;
210   NEXT
220   PRINT
230 NEXT