RosettaCodeData/Task/Loops-Continue/PureBasic/loops-continue.basic
2023-07-01 13:44:08 -04:00

12 lines
147 B
Text

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