RosettaCodeData/Task/Loops-Continue/PureBasic/loops-continue.basic

13 lines
147 B
Plaintext

OpenConsole()
For i.i = 1 To 10
Print(Str(i))
If i % 5 = 0
PrintN("")
Continue
EndIf
Print(",")
Next
Repeat: Until Inkey() <> ""