程序设计基础课件-循环.pptxVIP

15.1 基本概念循环的产生【例5.1】输入10个数，分别显示其ex值和lnx值。InputBox(x)y=exp(x)z=log(x)print x,y,z第1组算法如下：i=1如果i10 则转（8）InputBox(x)y=exp(x)z=log(x)print x,y,zi=i+1，转（2）结束 2循环的结构与控制循环条件“P”：可以是任意逻辑表达式循环体“S”：是循环的核心，是程序中需要重复执行的部分某些操作如果不需重复执行，则应该放在循环之外两种循环控制模式：当型循环和直到型循环 3根据循环条件分为两大类条件循环如果循环的次数已经确定，使用计数循环例如 求 S=1+2+3+……+100例如 求 T=10!计数循环如果循环的结束依赖于某个条件时，一般使用条件循环计数循环是一种特殊的条件循环 4循环中要注意的问题小心“死循环”！如何避免死循环呢？在循环体中应该有修改循环条件的语句可以根据程序需要设置多个循环结构出口利用“退出语句”结束循环多重循环多重循环又称为多层循环或嵌套循环，指的是在某个循环的循环体内存在其他循环结构。构成多重循环可以使用相同类型的循环语句，也可以使用不同类型的循环语句。要注意内外循环条件的循环变量是否相关。 55.2 循环语句5.2.1 While…Wend语句5.2.2 Do…Loop语句5.2.3 For…Next语句5.2.4 For Each…Next语句5.2.5 多重循环 65.2.1 While…Wend语句While…Wend循环语句语法格式为：While 条件 [语句序列]Wend注意用以实现当型循环应该在循环开始之前合理的为循环变量赋值语句序列中必须要有改变条件的语句循环语句实现如下：Dim i as Integer, x as SingleDim y as Single, z as Singlei = 1While i = 10x = inputBox(x=)y = Exp(x)z = Log(x)i = i + 1print x,y,z Wend 7【例5.1】实现画面步骤：在窗体上放一个按钮command1。双击该按钮在其Click事件中书写上述代码。运行。运行时在弹出的对话框中输入X的具体值，输入一个回车一次，一共10 个。画面如下图。 8 9【例5.2】题目：找出Fibonacci数列中首个值超过1000的项，并给出该项的位置。假定初始项为0、1。分析：要求找出首个值超过1000的项，可以根据每次新产生的项的值来进行判断控制，一旦超过就结束循环，转而输出该项的值及序号。需要在循环体中进行对结果变量fc递推更新 .主要代码：fa=0 ‘第一项fb=1 ‘第二项i=3 ’从3开始计数fc=fa+fb ‘先求第3项while fc1000 ’不超过1000就继续i=i+1fa=fbfb=fc fc=fa+fb ‘递推更新 wend print fc,I ‘打印结果值及其序号 10 115.2.2 Do…Loop语句Do…Loop语句语法：先判断条件Do [{While | Until} 条件][语句序列1][Exit Do][语句序列2]Loop后判断条件Do[语句序列1][Exit Do][语句序列2]Loop [{While | Until} 条件]Do后面的条件是可以省略的，这时格式为：Do语句序列Loop注意：防止死循环!!!循环体中必须有跳出循环的语句，即Exit Do语句。 12【例5.3】求题目分析题意是求1+2+3+…+100的累加和。设变量S为累加器，其初值为0 ，循环变量为i程序设计：窗体上放置1个标签和1个命令按钮。 13该按钮的Click事件代码如下：Private Sub Command1_Click()Dim n As Integer ,s as longs = 0: n = 1Do While n = 100 s = s + n n = n + 1LoopLabel1.Caption = 求和结果为： + Str(s)End Sub思考：循环体中语句n=n+1的作用是什么？循环结束后n的值是多少？如果s初值为1，程序应作如何修改才能使结果不变？如果调换循环体中两条语句的位置，程序该怎样变化才能使结果不变？如果使用Do Until…Loop语句，则Click事件代码为：Private Sub Command1_Click()Dim n As Integer, s as longs = 0: n = 1Do s = s + n n = n + 1Loop Until n 100Label1.Caption = 求和结果为： + Str(s)End Sub 14【例5.4