循环结构及以后.pptVIP

第5章 基本控制结构 5.3 循环结构 循环的作用是允许某个程序段被重复执行。 5.3.1 计数型循环 For…Next 5.3.2 条件型循环 Do…Loop 5.3.3 循环嵌套 5.3.4 循环结构应用——减速箱优化设计实例 for … next Do while… loop 如果在循环体中又包含了一个完整的循环结构，称为循环的嵌套。 5.3.4 减速箱优化设计实例 5.3.4 减速箱优化设计实例 该减速器的总中心距计算式为 : 5.3.4 减速箱优化设计实例 上机实验内容：课下必须看书。 5.3 循环结构 循环的作用是允许某个程序段被重复执行。 Do…Loop的其他两种形式 循环零次或多次 至少循环一次 Do Until 条件表达式语句块 Loop Do语句块 Loop Until 条件表达式 Do Until…loop 当条件为假时执行循环体，当条件为真时不执行循环体。 Dim n% n = 0 Do While n = 5 Print n n = n + 1 Loop 打印引例→改为until循环 例：求 1+2+3+…+n3000 的最小n值。如何改？ 5.3.2 do…loop 语句小结 1) 前测型为先判断后执行，有可能一次也不执行；后测型为先执行后判断，至少执行一次； 2) 关键字While用于指明条件为真（True）时，执行循环体内语句，而Until正相反； 3) 循环体内应该有改变条件的语句，否则，可能出现死循环； 4) 注意循环变量初始值赋值； 5) 用于循环次数未知的情况。 5.3.3 循环嵌套 例6：打印图形： For i = 1 To 3 For j = 1 To 2 Print ＊; Next j Print Next i 5.3.3 循环嵌套 例7：打印九九乘法表。 5.3.3 循环嵌套 Print Tab(35); 九九乘法表 Print Tab(35); ----------- For i = 1 To 9 Print Next i 思考：打印上三角或下三角程序如何改动？要打印下三角? For j = 1 To 9 se = 1 x j = 1 * j Print Tab(j * 10); se; Next j For j = 1 To 9 se = 2 x j = 2 * j Print Tab(j * 10); se; Next j For j = 1 To 9 Print Tab(j * 10); i x j = i * j; Next j 5.3.3 循环嵌套 循环的嵌套，应该注意的事项： 内循环变量与外循环变量不能同名； 外循环必须完全包含内循环，不能交叉； 不能从循环体外转向循环体内，反之则可以。 For ii =1 To 10 For jj=1 To 20 … Next ii Next jj For ii =1 To 10 For ii=1 To 20 … Next ii Next ii For ii =1 To 10 For jj=1 To 20 … Next jj Next ii For ii =1 To 10 … Next ii For