Pascal 循环

Pascal 是一种结构化编程语言，其中循环是一种常见的编程构造。Pascal 提供了几种循环结构来处理重复执行代码的需要。本文将介绍 Pascal 中的循环结构以及它们的使用方法。

1. while 循环

while 循环用于重复执行一系列语句，只要指定的条件为真。这个条件可以是任何返回布尔值的表达式。while 循环的语法如下：

while 条件 do
begin
    // 需要执行的代码
end;

其中，条件是一个布尔表达式，如果条件为真，则执行 begin 和 end 之间的语句。如果条件为假，则跳过该循环。

下面是一个 while 循环的例子：

var
    i: Integer;
begin
    i := 1;
    while i <= 10 do
    begin
        WriteLn(i);
        Inc(i);
    end;
end.

上面的代码使用 while 循环打印 1 到 10 之间的整数。

2. repeat-until 循环

repeat-until 循环在 while 循环后是另一种常见的循环结构。repeat-until 循环执行一系列语句，然后检查条件。如果条件为假，则重复执行该系列语句，直到条件为真为止。repeat-until 循环的语法如下：

repeat
    // 需要执行的代码
until 条件;

下面是一个 repeat-until 循环的例子：

var
    i: Integer;
begin
    i := 1;
    repeat
        WriteLn(i);
        Inc(i);
    until i > 10;
end.

上面的代码使用 repeat-until 循环打印 1 到 10 之间的整数。

3. for 循环

Pascal 中最常用的循环结构是 for 循环，它可以重复执行一系列语句，但是其循环次数是在执行循环前确定的。for 循环的语法如下：

for loop_variable := 初始值 to/fown 结束值 do
begin
    // 需要执行的代码
end;

其中，loop_variable 是一个循环变量，它的值会在每次循环时更新。初始值是循环变量的初始值，而结束值是循环变量的最终值，可以是 to 或者 downto。

下面是一个 for 循环的例子：

var
    i: Integer;
begin
    for i := 1 to 10 do
    begin
        WriteLn(i);
    end;
end.

上面的代码使用 for 循环打印 1 到 10 之间的整数。

4. break 和 continue

在循环中，有时需要提供一些控制语句，以便在特定条件下退出循环或直接开始下一个循环迭代。Pascal 提供了两个语句，break 和 continue，可以实现这样的要求。

break 语句用于终止循环，提前结束。下面是一个 break 语句的例子：

var
    i: Integer;
begin
    i := 1;
    while i <= 10 do
    begin
        WriteLn(i);
        Inc(i);
        if i = 5 then
            break;
    end;
end.

上面的代码使用 while 循环打印 1 到 10 之间的整数，但在 i 等于 5 时退出循环。

continue 语句用于结束当前循环迭代，并开始下一个循环迭代。下面是一个 continue 语句的例子：

var
    i: Integer;
begin
    for i := 1 to 10 do
    begin
        if i = 5 then
            continue;
        WriteLn(i);
    end;
end.

上面的代码使用 for 循环打印 1 到 10 之间的整数，但在 i 等于 5 时跳过本次循环迭代。

总结

本文介绍了 Pascal 中的三种常见循环结构：while 循环、repeat-until 循环和 for 循环。此外，我们还介绍了 break 和 continue 控制语句。希望通过本文，你能更好地理解 Pascal 循环的使用方法。