COBOL - 循环语句

程序中需要重复执行某些语句，例如读取文件的每条记录直到结束。程序中的语句按顺序运行，直到或除非流程中执行的任何语句更改执行顺序。

对于迭代编程，在 COBOL 中使用 PERFORM 语句。这些循环语句是

• PERFORM THRU
• PERFORM UNTIL
• PERFORM TIMES
• PERFORM VARYING

PERFORM THRU

Perform Thru 通过按顺序给出段落的第一个和最后一个名称来执行一系列段落。在执行完最后一个段落后，控制将返回。

基于在其下编码的语句，PERFORM 主要分为两种类型

• 内联 PERFORM
• 外联 PERFORM

让我们看看它们之间的区别

示例

让我们看一个 PERFORM THRU 语句的例子

输出

当您编译并执行上述程序时，它将显示以下输出

PERFORM UNTIL

在 PERFORM UNTIL 语句中，将执行一个语句块或一个段落/节，直到指定的条件变为真。

默认条件是“ WITH TEST BEFORE”，它指定在执行段落中的语句之前测试条件。

语法

以下是 PERFORM UNTIL 的语法

示例

让我们看一个 PERFORM UNTIL 语句的例子

输出

当您编译并执行上述程序时，它将显示以下输出

PERFORM TIMES

PERFORM TIMES 主要用于使用指定的次数重复执行语句块或段落/节。

语法

以下是 PERFORM TIMES 的语法

示例

让我们看一个 PERFORM TIMES 的例子

输出

当您编译并执行上述程序时，它将显示以下输出

PERFORM VARYING

在 PERFORM VARYING 中将执行一个语句块或一个段落/节，直到 UNTIL 短语中的条件变为真。

语法

以下是 PERFORM VARYING 的语法

示例

让我们看一个 PERFORM VARYING 的例子

输出

当您编译并执行上述程序时，它将显示以下输出

GO TO 语句

在程序中，GO TO 语句会更改执行流程。在该语句中，控制仅向前转移。它用于退出程序。GO TO 语句的各种类型如下：

无条件 GO TO

以下是无条件 GO TO 的语法

条件 GO TO

以下是条件 GO TO 的语法

在这里，如果 x = 1，则控制将转移到第一个段落，如果 x = 2，则控制将转移到第二个段落，依此类推。

示例

让我们看一个 GO To 语句的例子

输出

当您编译并执行上述程序时，它将显示以下输出