9 lines
204 B
Text
9 lines
204 B
Text
MODULE LoopsContinue;
|
|
IMPORT Out;
|
|
VAR i : INTEGER;
|
|
BEGIN
|
|
FOR i := 1 TO 10 DO
|
|
Out.Int( i, 0 );
|
|
IF i # 5 THEN Out.String( ", " ) ELSE Out.Ln END
|
|
END
|
|
END LoopsContinue.
|