RosettaCodeData/Task/Loops-Continue/Modula-3/loops-continue.mod3
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

8 lines
116 B
Text

FOR i := 1 TO 10 DO
IO.PutInt(i);
IF i MOD 5 = 0 THEN
IO.Put("\n");
RETURN;
END;
IO.Put(", ");
END;