Tcl 中的 while语句函数

只要给定条件为真，用Tcl语言编写的 while 循环语句将重复执行目标语句。

while loop - 语法

while {condition} {
   statement(s)
}

while loop - 流程图

while loop - 示例

#!/usr/bin/tclsh

set a 10

#while循环执行
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