RosettaCodeData/Task/Integer-sequence/Liberty-BASIC/integer-sequence.basic

7 lines
60 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
while 1
i=i+1
locate 1,1
print i
scan
wend