RosettaCodeData/Task/Loops-Do-while/Liberty-BASIC/loops-do-while.basic

6 lines
57 B
Plaintext

a = 0
do
a = a + 1
print a
loop until (a mod 6) = 0