RosettaCodeData/Task/Loops-N-plus-one-half/Action-/loops-n-plus-one-half.action
2023-07-01 13:44:08 -04:00

12 lines
118 B
Text

PROC Main()
BYTE i=[1]
DO
PrintB(i)
IF i=10 THEN
EXIT
FI
Print(", ")
i==+1
OD
RETURN