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.