自強不息，學習學習再學習

想起大學時印象很深的的一條循環語句

for (i=0,i<=∞,i++)

......

現在，繼續這樣調動自己的學習興趣，不知道這樣寫出來能否運行呢？

......

DATA DIVISION.

WORKONG-STORAGE SECTION.

01      LOVE                   PIC     99.

01      Y                         PIC    99.

PROCEDURE DIVISION.

          MOVE 1 TO LOVE.

          PERFORM 100-OUTER-LOOP

                    UNTIL  LOVE > 99.

          DISPLAY 'COMPLETE!'.

                    STOP RUN.

*

100-OUTER-LOOP.

           MOVE 0 TO Y.

           PERFORM

                     UNTIL  Y > LOVE

           COMPUTE LOVE = Y + LOVE

           ADD 1 TO Y

           END-PERFORM.

          DISPLAY 'Y:'Y       'LOVE:' LOVE.

          ADD 1 TO LOVE.