Pascal - While-do 循环

Pascal 中的 while-do 循环语句允许重复计算,直到满足某些测试条件。 换句话说,只要给定的条件为真,它就会重复执行目标语句。

语法

while-do 循环的语法是 −

while (condition) do S;

其中,condition 是布尔值或关系表达式,其值为 true 或 false,S 是 BEGIN ... END 块内的简单语句或语句组 。

例如,

while number>0 do
begin
   sum := sum + number;
   number := number - 2;
end;

当条件变为 false 时,程序控制将传递到紧接循环后面的行。

流程图

Pascal 中的 while-do 循环

这里,while 循环的关键点是该循环可能永远不会运行。 当条件测试结果为假时,将跳过循环体并执行 while 循环后的第一条语句。

示例

program whileLoop;
var
   a: integer;

begin
   a := 10;
   while  a < 20  do
   
   begin
      writeln('value of a: ', a);
      a := a + 1;
   end;
end.

当上面的代码被编译并执行时,会产生以下结果 −

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15
value of a: 16
value of a: 17
value of a: 18
value of a: 19

❮ pascal_loops.html