10 lines
239 B
Text
10 lines
239 B
Text
N%=13
|
|
PRINT "[" LEFT$(FNLexOrder(0)) "]"
|
|
END
|
|
|
|
DEF FNLexOrder(nr%) : LOCAL i%, s$
|
|
FOR i%=nr% TO nr% + 9
|
|
IF i% > N% EXIT FOR
|
|
IF i% > 0 s$+=STR$i% + "," + FNLexOrder(i% * 10)
|
|
NEXT
|
|
=s$
|