10 lines
160 B
Text
10 lines
160 B
Text
|
100 PROGRAM "FloydT.bas"
|
||
|
|
110 LET N=14:LET J=1
|
||
|
|
120 TEXT 80
|
||
|
|
130 FOR I=1 TO N
|
||
|
|
140 FOR J=J TO J+I-1
|
||
|
|
150 PRINT USING " ###":J;
|
||
|
|
160 NEXT
|
||
|
|
170 PRINT
|
||
|
|
180 NEXT
|