RosettaCodeData/Task/Integer-sequence/BASIC256/integer-sequence.basic

7 lines
45 B
Plaintext

i = 1
do
print i
i += 1
until i = 0