6 lines
121 B
Text
6 lines
121 B
Text
100 PROGRAM "100doors.bas"
|
|
110 LET NR=1:LET D=3
|
|
120 DO
|
|
130 PRINT NR
|
|
140 LET NR=NR+D:LET D=D+2
|
|
150 LOOP WHILE NR<=100
|