9 lines
160 B
Text
9 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
|