27循环结构程序设计 (2).ppt

《27循环结构程序设计 (2).ppt》由会员分享，可在线阅读，更多相关《27循环结构程序设计 (2).ppt（31页珍藏版）》请在得力文库 - 分享文档赚钱的网站上搜索。

1、1循环结构循环结构循环结构是程序的基本结构之一。所谓循环，就是重循环结构是程序的基本结构之一。所谓循环，就是重复的执行某些操作，直到指定的条件满足为止。考纲中要复的执行某些操作，直到指定的条件满足为止。考纲中要求大家掌握的循环包括求大家掌握的循环包括ForNext(计数计数)循环与循环与DoLoop(Do)循环。其中，循环。其中，DoLoop循环是当给定的条件满循环是当给定的条件满足要求时执行循环体，而足要求时执行循环体，而ForNext循环是按照规定的次循环是按照规定的次数执行循环体。数执行循环体。27 循环结构程序设计循环结构程序设计2For循环语句循环语句如果事先已知循环次数，则可使用如

2、果事先已知循环次数，则可使用ForNext循环结构语循环结构语句。它的一般格式如下：句。它的一般格式如下：For 循环变量初值循环变量初值to 终值终值 Step步长步长循环体循环体Exit ForNext循环变量循环变量参数意义：循环变量是数值变量，一般为整数型。初值参数意义：循环变量是数值变量，一般为整数型。初值和终值各是一个数值表达式。步长为循环变量的增量，是一个和终值各是一个数值表达式。步长为循环变量的增量，是一个数值表达式。其值可以是正数数值表达式。其值可以是正数(递增循环递增循环)，也可以是负数，也可以是负数(递减递减循环循环)，但不能是，但不能是0。如果省略步长，则系统默认步长为

3、。如果省略步长，则系统默认步长为1。执行方式：当初值、终值与步长为算术表达式时，首先计执行方式：当初值、终值与步长为算术表达式时，首先计算初值、终值与步长表达式的值算初值、终值与步长表达式的值给循环变量赋初值给循环变量赋初值给循环变给循环变量赋初值量赋初值判断循环变量的值是否超过终值，如果超过就停止执判断循环变量的值是否超过终值，如果超过就停止执行行“循环体循环体”，跳出循环，执行，跳出循环，执行Next后面的语句后面的语句否则执行一次否则执行一次“循环体循环体”，就把，就把“循环变量步长循环变量步长”的值赋给的值赋给“循环变量循环变量”，再重复以上过程。再重复以上过程。ForNext循环遵循

4、循环遵循“先检查、后执行先检查、后执行”的原则，即先检的原则，即先检查循环变量是否超过终值，然后决定是否执行循环体。查循环变量是否超过终值，然后决定是否执行循环体。ForNext循环的正常循环次数可以用以下公式进行计循环的正常循环次数可以用以下公式进行计算：算：循环次数循环次数Int(终值初值终值初值)/步长步长)1通常，通常，ForNext循环正常结束，即循环变量达到终值循环正常结束，即循环变量达到终值。但有些情况下，可能需要提前退出循环，这时可以通过。但有些情况下，可能需要提前退出循环，这时可以通过Exit For语句来实现。在一个语句来实现。在一个ForNext循环中，可以含一个循环中，

5、可以含一个或多个或多个Exit For语句，并可以出现在循环体的任意位置。语句，并可以出现在循环体的任意位置。For循环可以进行嵌套，即一个大循环套着一个小循环。循环可以进行嵌套，即一个大循环套着一个小循环。但必须注意，嵌套不能骑跨，必须完整的将小循环嵌套在大循环但必须注意，嵌套不能骑跨，必须完整的将小循环嵌套在大循环内。内。For语句的循环执行方式流程图如下图所示：语句的循环执行方式流程图如下图所示：3Do循环语句循环语句Do循环不仅可以不按照限定的次数执行循环内的语句块，而且循环不仅可以不按照限定的次数执行循环内的语句块，而且可以根据循环条件是可以根据循环条件是“True”或或“False

6、”决定是否结束循环。决定是否结束循环。Do语句的格式有多种，常用的语句的格式有多种，常用的Do语句格式如下：语句格式如下：Do While 条件表达式条件表达式语句块语句块Exit DoLoopDo循环语句的功能是：当指定的循环语句的功能是：当指定的“循环条件循环条件”为为Ture时重复执行循环体。执行过程是：先计算条件表达式的值时重复执行循环体。执行过程是：先计算条件表达式的值如如果值为果值为True，执行一次循环体中的语句块，执行一次循环体中的语句块遇到遇到Loop语句再语句再次计算条件表达式的值次计算条件表达式的值如果值为如果值为True，再重复执行一次循环，再重复执行一次循环体中的语句

7、块体中的语句块循环往复直到条件表达式的值为循环往复直到条件表达式的值为False时退出时退出循环体。循环体。如果条件总是成立，则如果条件总是成立，则DoLoop循环也是变成一个循环也是变成一个“死循环死循环”。在这种情况下，可以利用。在这种情况下，可以利用Exit Do语句跳出循环。语句跳出循环。一个一个DoLoop循环中可以有一个或多个循环中可以有一个或多个Exit Do语句，并且语句，并且Exit Do语句可以出现在循环体的任何地方。当执行到该语句语句可以出现在循环体的任何地方。当执行到该语句时，结束循环，并把控制转移到时，结束循环，并把控制转移到Do循环后面的语句。循环后面的语句。DoL

8、oop循环也可以像循环也可以像ForNext循环那样进行循环嵌循环那样进行循环嵌套，其嵌套规则一样。套，其嵌套规则一样。Do WhileLoop循环结构的流程图如下图所示：循环结构的流程图如下图所示：本章节学习中需要完全掌握本章节学习中需要完全掌握For循环语句与循环语句与Do循环语句的循环语句的使用方法。灵活掌握使用方法。灵活掌握Exit For语句与语句与Exit Do语句的使用。难点语句的使用。难点是循环的嵌套使用。考查方式为选择题与填空题。是循环的嵌套使用。考查方式为选择题与填空题。1 1有如下有如下VBVB程序段：程序段：s 1For i 10 To _ Step 1 s s 2 *

9、 iNext i若要使语句若要使语句 s s 2 * i执行执行6 6次，则循环变量次，则循环变量i i的终的终值应为值应为 ( () )A A4 4B B5 5C C6 6D D7 7B B B B 2有如下有如下VB程序段：程序段：s 1For i 1 To 10 Step 3 s s iNext i该程序执行后，变量该程序执行后，变量s与与i的值分别是的值分别是 ()A22,13 B23,13C13,23 D12,22C C 3有如下有如下VB程序段：程序段：Private Sub Command1_Click() Dim a As Integer, i As Integer List1

10、.Clear For i 1 To 5 a i * (i 1) List1.AddItem Str(a) Next iEnd Sub该运行程序后，单击命令按钮该运行程序后，单击命令按钮Command1，在列表框，在列表框List1中显示的数据个数是中显示的数据个数是 ()A1B2C5D10 4有如下有如下VB程序段：程序段：k 1: s 0Do While k 5 s s k k k 1Loop该程序运行后，变量该程序运行后，变量k和和s的值分别是的值分别是 () A5,10B10,5 C6,15D15,6C C A A5有如下有如下VB程序段：程序段：s 0: i 1Do While _ s

11、 s i i i 3Loop该程序运行后，变量该程序运行后，变量s的值等于的值等于5，则程序划线处的，则程序划线处的语句是语句是 ()Ai 5 Bi 9Ci y Then x x y Else x x y Print x, y Next iEnd Sub仔细分析该程序段，得出其中缺少了仔细分析该程序段，得出其中缺少了( )C C8有如下有如下VB程序段：程序段：s 0For i 1 To 15 s s i Mod 2Next iLabel1.Caption Str(s)该程序运行后，在标签该程序运行后，在标签Label1中显示的是中显示的是 ()A5 B7C8 D9D D程序代码：程序代码：P

12、rivate Sub Command1_Click() Dim i As Integer Dim s As Long s 1For Next i Label1.Caption Str(s)End Sub 则代码和处应填入的是则代码和处应填入的是 ()Ai1 to 15ss*i Bi1 to 15ssiCi1 to 15 step 3ssi Di1 to 15 step 3ss*i9某算法的部分程序代码与其相对应的流程图分别表示如下：某算法的部分程序代码与其相对应的流程图分别表示如下：10某某VB程序段如下图所示：程序段如下图所示：该程序运行后，变量该程序运行后，变量s中存储的是中存储的是()A

13、50个随机整数中奇数的个数个随机整数中奇数的个数 B50个随机整数中偶数的个数个随机整数中偶数的个数C50个随机整数中奇数的和个随机整数中奇数的和 D50个随机整数中偶数的和个随机整数中偶数的和C11某某VB程序段如下：程序段如下：Private Sub Command1_Click() Dim i As Integer Dim a(1 To 10) As Integer List1.Clear For i 1 To 10 a(i) i 20 Next i For i 1 To 10List1.AddItem Str(a(i) Next iEnd SubCA下标越界下标越界 B无效的过程调用或

14、参数无效的过程调用或参数C溢出溢出 D类型不匹配类型不匹配程序运行时，单击命令按钮程序运行时，单击命令按钮Command1后，将会出现的提示信息是后，将会出现的提示信息是()Private Sub Command1_Click() Dim a(1 To 5) As Integer, i As Integer a(1) 1 a(2) 1 For i 3 To 5 a(i) a(i 1) * a(i 2) Next i Text1.Text Str(a(4) Text2.Text Str(a(5)End Sub运行该程序，单击命令按钮运行该程序，单击命令按钮Command1后，文本框后，文本框Te

15、xt1中显示的是中显示的是_，文本框，文本框Text2中显示的是中显示的是_。1112有如下有如下VB程序：程序：13以下以下VB程序的功能是：计算表达式程序的功能是：计算表达式139272187的值，并在文本框的值，并在文本框Text1中输出结果。为了实现这一功能，程中输出结果。为了实现这一功能，程序方框中的语句应更正为序方框中的语句应更正为_。Dim i As Integer, s As Longs 0i 1Do While i 2187s i i * 3LoopText1.Text Str(s)s+i2*s+i14小李用如下小李用如下VB程序来计算程序来计算13335393。i 10或或

16、i 9Private Sub Command1_Click() Dim i As Integer, s As Long i 1: s 0 Do Whilei10 s s i 3 i i 2 Loop MsgBox sEnd Sub运行该程序，单击命令按钮运行该程序，单击命令按钮Command1，出现如下图所示，出现如下图所示的错误信息，为实现计算要求，程序中划线处的语句应修的错误信息，为实现计算要求，程序中划线处的语句应修改为改为_。1515以下以下VBVB程序的功能是：程序的功能是：“找出一个正整数的所有找出一个正整数的所有因子因子”。Private Sub Command1_Click()

17、 Dim x As Integer, c As Integer, i As Integer x InputBox(“(“请输入一个正整数请输入一个正整数”)”) If x 1 Then MsgBox “输入错误输入错误” Exit SubEnd Ifc 0For i 1 To x For i 1 To x If x Mod i 0 Then c c 1 List1.AddItem Str(i) End If Next i Label1.Caption “该数共有该数共有” Str(c) “个因子。个因子。”End Sub阅读分析上述程序，填写表空白处的内容。阅读分析上述程序，填写表空白处的内容

18、。变量名变量名变量的作用变量的作用x用于存储输入的待查找因子的正整数用于存储输入的待查找因子的正整数_用于存储用于存储x的因子个数的因子个数i_C用于判断是否为用于判断是否为x的因子的因子16.(操作题操作题)以下程序的功能是：利用随机函数模拟投币。方法以下程序的功能是：利用随机函数模拟投币。方法是：每次随机产生一个是：每次随机产生一个0或或1的整数，相当于一次投币，的整数，相当于一次投币，1代表正面代表正面，0代表反面。运行时，用文本框代表反面。运行时，用文本框Text1输入投币总次数，然后单击输入投币总次数，然后单击“开始开始”按钮，按照输入的总次数摸拟投币，分别统计出现正面、反按钮，按照

19、输入的总次数摸拟投币，分别统计出现正面、反面的次数，并在文本框面的次数，并在文本框Text2和和Text3中显示出现正面的次数和出现中显示出现正面的次数和出现反面的次数。程序设计界面和代码如下所示：反面的次数。程序设计界面和代码如下所示：Private Sub Command1_Click() Dim n As Integer, a As Integer, b As Integer Dim r As Integer Randomize n Val(Text1.Text) a 0正面统计初始值正面统计初始值 b 0反面统计初始值反面统计初始值 For i 1 To n r _产生随机数产生随机数 If r 1 Then _ Int(rnd()*2)a=a+1 Else _ End If Next i Text2.Text Str(a) Text3.Text Str(b) End Sub为实现该程序的功能。请将程序划线处代码补充完整。为实现该程序的功能。请将程序划线处代码补充完整。b=b+1