10 lines
204 B
Text
10 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.
|