Pascal - While-do 迴圈

Pascal 中的 while-do 迴圈語句允許重複計算，直到滿足某些測試條件。換句話說，只要給定的條件為真，它便會重複執行目標語句。

語法

while-do 迴圈的語法是 -

while (condition) do S;

其中，condition 是布林值或關係表示式，其值為真或假，而 S 是 BEGIN ... END 塊中的簡單語句或語句組。

例如，

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

當條件變為假時，程式控制權將傳給緊跟在迴圈後的下一行。

流程圖

此處，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