Tcl -- loop

一.while

Tcl中while循环的语法是：

while {condition} {
     statement(s)
}

只要condition为真（true），就会执行statement语句。

statement可以是单条语句或语句块，若条件为假，跳过while循环语句，继续执行循环后的语句。

example1：

 

二.for

Tcl语言中for循环的语法是：

for {initialization} {condition} {increment} {
	statement(s);
}

1) Initialization初始化步骤首先执行，并且只有一次。可以声明和初始化循环控制变量。

2) Condition初始化完成后，进行条件的判断，如果为真（true），执行循环体，如果为假，不执行循环体，跳出循环。

3) Increment增量语句，它的执行是建立在条件为真，执行了循环体之后的基础上的，若条件为真，循环体执行后，执行该语句，用来更新循环控制变量。

4) Condition执行完增量语句后，重新进行条件的判断，若为真，重新执行循环体（循环体-增量语句-条件判断-循环体），直到条件为假，for循环终止。

流程图如下：

example2：

 

三. foreach

foreach循环，反复循环操作一个或多个列表的每个元素，格式为：

1）foreach varname list body

   varname：变量名

   list：有序集合

   body：循环体

2）foreach varlist1 list1 ?varlist2 list2…? Body

功能是遍历列表中的元素，主要有三种使用形式：

1）对单个列表中的元素进行一个一个进行遍历

2）对列表进行多个元素一起赋值，这时varname是一个有n个元素列表的结构，每次遍历list列表中的n个元素赋值给以varname列表元素为名称的变量。

3）遍历多个列表中的元素

4）如果元素不足，以空的来补充。