RosettaCodeData/Task/Loops-Continue/BASIC/loops-continue-2.basic

5 lines
102 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
FOR i% = 1 TO 10
PRINT ; i% ;
IF i% MOD 5 = 0 PRINT ELSE PRINT ", ";
NEXT