请教一句COBOL命令的意义
来源:百度知道 编辑:UC知道 时间:2024/06/14 10:52:24
PERFORM VARYING IDX FROM 1 BY 1
UNTIL IDX > 5
....
END-PERFORM
请问PERFORM后面命令是什么意思……
希望可以特别讲一下FROM BY
谢谢!
UNTIL IDX > 5
....
END-PERFORM
请问PERFORM后面命令是什么意思……
希望可以特别讲一下FROM BY
谢谢!
VARYING IDX -->idx 作为循环下标
FROM 1--> idx从1开始
BY 1-->步长为1(就是加1)
until idx>5 -->直到下标大于5退出循环
和C的"FOR (I=1;I<=5;I++)"功能一样.
循环. IDX 从 1 (FROM 1) 到 5 (UNTIL IDX>5), 步长为1(BY 1).
相当于 C 的: for (idx=1; idx<=5; idx=idx+1);
BASIC 的 for idx = 1 to 5 step 1
IDX作为循环下标,每次累加1,一直执行到5结束。
(循环体内部共计执行五次)。
FROM X BY Y 的含义是从x开始,每次累加y的过程
改写成简单的Cobol语句即为:
ADD 1 TO IDX
PERFORM UNTIL IDX > 5
ADD 1 TO IDX
....
END-PERFORM
或:
INITIALIZE IDX
PERFORM UNTIL IDX >= 5
ADD 1 TO IDX
....
END-PERFORM