《《VisualBasic Net程序设计》教学课件：第9-10讲 循环结构》由会员分享，可在线阅读，更多相关《《VisualBasic Net程序设计》教学课件：第9-10讲 循环结构（28页珍藏版）》请在金锄头文库上搜索。
1、VisualBasic.NetVisualBasic.Net程序设计程序设计华中农业大学信息学院华中农业大学信息学院 章程章程2第第8 8讲讲 循环结构循环结构 8.1 For8.1 For Next Next循环循环 8.2 For8.2 For语句应用举例语句应用举例 8.3 Do8.3 Do Loop Loop循环循环 8.4 8.4 Do.LoopDo.Loop应用举例应用举例8.5 8.5 循环的嵌套循环的嵌套华中农业大学信息学院华中农业大学信息学院31 1、语法形式、语法形式 For For 循环变量初值循环变量初值 to to 终值终值 Step Step 步长步长 语句块语句块
2、 Exit ForExit For 语句块语句块 Next 循环变量循环变量8.1 ForNext 8.1 ForNext 循环循环华中农业大学信息学院华中农业大学信息学院4 语句块语句块 Exit For 语句块语句块 循环变量加步长循环变量加步长 TF 循环变量得初值循环变量得初值循环变量在终值内8.1 ForNext 8.1 ForNext 循环循环关于步长关于步长: 0 初值终值 终值=0 死循环 步长步长循环次数循环次数=动画演示动画演示 华中农业大学信息学院华中农业大学信息学院5例9-1：求1+2+3+100的值8.2. For8.2. For语句应用举例语句应用举例华中农业大学信
3、息学院华中农业大学信息学院6例例8-18-1：求：求1+2+3+1001+2+3+100的值的值S0=0S1=S0+1S2=S1+2S3=S2+3S4=S3+4S100=S99+100Si=Si-1+i i=1.100S = 0i = 1S = S + ii = Ni = i + 1S即为所求即为所求TF华中农业大学信息学院华中农业大学信息学院7例9-2：求一个数是否为素数算法算法: :对于数n, 在i=2，3，n-1中找是否有能整除n的数，若有，n不是素数，否则，是。例例8-28-2：判断素数：判断素数华中农业大学信息学院华中农业大学信息学院8例8-3：求N! FS = 1i = 1S =
4、S * ii = Ni = i + 1S即为所求即为所求T例例9-3：求：求N!N! = 1 * 2 * 3* N华中农业大学信息学院华中农业大学信息学院9引 例例9-4 我国有13亿人口，按人口年增长0.8%计，少年后我国人口超过26亿。华中农业大学信息学院华中农业大学信息学院108.3 DoLoop循环语句 形式形式1 1： Do While|Until Do While|Until 语句块语句块LoopLoopDoDo循环用于控制循环次数未知的场合。循环用于控制循环次数未知的场合。流程动画演示流程动画演示华中农业大学信息学院华中农业大学信息学院118.3 DoLoop循环语句形式形式2
5、2：DoDo 语句语句Loop While|Until Loop While|Until 流程动画演示流程动画演示华中农业大学信息学院华中农业大学信息学院128.4. DoLoop8.4. DoLoop应用举例应用举例例例9-59-5：求：求1+2+3+1001+2+3+100的值的值S = 0i = 1S = S + ii n(2) m除以n得余数r(3) 若r=0，则n为最大公约数，结束； 否则执行(4) (4) n m ， r n ，返回（2）8.4.1 8.4.1 辗转相除法辗转相除法华中农业大学信息学院华中农业大学信息学院15要求其误差小于0.00001，近似公式为: e=1+1/1
6、!+1/2!+1/3!+1/n!+ 例例9-79-7, ,求自然对数求自然对数e e的近似值的近似值8.4.2 8.4.2 求近似值求近似值华中农业大学信息学院华中农业大学信息学院168.5 8.5 循环的嵌套循环的嵌套例9-8 打印九九乘法表思考：打印上三角或下三角程序如何改动？思考：打印上三角或下三角程序如何改动？华中农业大学信息学院华中农业大学信息学院17例例11-3 11-3 百元买百鸡：百元买百鸡：假定小鸡每只5角，公鸡每只2元，母鸡每只3元。现有100元要求买100只鸡，列出所有可能的购买方案。三、循环结构华中农业大学信息学院华中农业大学信息学院18例例11-2 11-2 斐波拉契
7、数列斐波拉契数列- -兔子繁殖问题F0=0，F1=1，Fn=F(n-1)+F(n-2)（n=2，nN*） 三、循环结构华中农业大学信息学院华中农业大学信息学院19猴子吃桃子：小猴在某天摘桃若干个，当天吃掉一半多一个；猴子吃桃子：小猴在某天摘桃若干个，当天吃掉一半多一个；第二天吃了剩下的桃子的一半多一个；以后每天都吃尚存第二天吃了剩下的桃子的一半多一个；以后每天都吃尚存桃子的一半多一个，到第桃子的一半多一个，到第7天要吃时只剩下一个，问小猴天要吃时只剩下一个，问小猴共摘下了多少个桃子？共摘下了多少个桃子？ 华中农业大学信息学院华中农业大学信息学院20利用幂级数展开计算sinx近似值，要求误差小于
8、10（-6） sinx=x-x3/3!+x5/5!-x7/7!+ 华中农业大学信息学院华中农业大学信息学院21华中农业大学信息学院华中农业大学信息学院22华中农业大学信息学院华中农业大学信息学院23华中农业大学信息学院华中农业大学信息学院24 若若干干数数求求最最大大值值，先先假假设设一一较较小小数数为为初初值值，若若无无法法估估计计较较小小数数，则则取取第第一一个个数数为为最最大大值值初初值值；然然后后将将每每一一个个数数与与最最大大值值比比较较，若若该该数数大大于于最最大大值值，将将该该数数替换为最大值；依次逐一比较。替换为最大值；依次逐一比较。 求最小值应设置一较大数为初值。求最小值应设
9、置一较大数为初值。求最大或最小值求最大或最小值华中农业大学信息学院华中农业大学信息学院25例例 随机产生随机产生1010个个100100200200之间的数，求最大值。之间的数，求最大值。 x = x = Int(RndInt(Rnd * 101 + 100) * 101 + 100) max = x max = x For i = 1 To 9 For i = 1 To 9 x = x = Int(RndInt(Rnd * 101 + 100) * 101 + 100) If x max Then max = x If x max Then max = x Next i Next i Lab
10、el1.Text = Label1.Text = 最大值最大值= = & max & max华中农业大学信息学院华中农业大学信息学院268.6 8.6 其他辅助控制语句其他辅助控制语句1.1.Go To Go To 语句语句 Go To 标号|行号 2.Exit2.Exit语句语句 Exit For、Exit Do、 Exit Sub、Exit Function3.End3.End语句语句4.With 4.With 语句语句 With 对象 语句块 End With华中农业大学信息学院华中农业大学信息学院27小小 结结循环结构的实现nForNext 语句 适用于循环次数已知的场合，For-Next的语法形式和执行流程。nDoLoop语句 当型循环和直到型循环的区别，DoLoop语句和ForNext语句的区别和相互转化n循环的嵌套n典型算法：累加、连乘、素数判断、辗转相除法华中农业大学信息学院华中农业大学信息学院
