Tcl - while 迴圈

Tcl 語言中的 while 迴圈語句會重複執行目標語句，直到給定條件為真。

語法

Tcl 語言中 while 迴圈的語法如下：

while {condition} {
   statement(s)
}

這裡，statement(s) 可以是單個語句或語句塊。condition 可以是任何表示式，非零值表示真。迴圈在條件為真的情況下迭代。

當條件變為假時，程式控制將傳遞到迴圈後緊隨其後的行。

流程圖

關於 while 迴圈需要注意的一點是，迴圈可能永遠不會執行。當測試條件並結果為假時，將跳過迴圈體，並執行 while 迴圈後的第一個語句。

示例

#!/usr/bin/tclsh

set a 10

#while loop execution 
while { $a < 20 } {
   puts "value of a: $a"
   incr a
}

當以上程式碼被編譯並執行時，會產生以下結果：

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