《循环结构(for循环)》由会员分享，可在线阅读，更多相关《循环结构(for循环)（13页珍藏版）》请在金锄头文库上搜索。
1、选择结构复习：单分支：行：If 条件 Then语句 块： If 条件 Then语句End If双分支行：块：If 条件 Then 语句 1 Else 语句 2If 条件 Then语句 1Else语句 2End If多分支 ElseIf 语句If 条件 1 then语句 1ElseIf 条件 2then语句 2ElseIf 条件 3then语句 3Else语句End IfSelect Case 语句Select Case 表达式Case 表达式 1语句 lCase 表达式 2 语句2Case 表达式 n 语句 nCase Else语句 n+1End Select循环结构程序设计一 循环结构控制语
2、句 程序设计三种基本结构结构：选择结构 （如图）If 条件表达式 Then 语句End IfFor I = 1语句Next ITo 10 Step 1判断条件：条件满足就执行语句;条件不满足就不执行。For 循环结构 （如图）判断条件：1. 条件满足就执行语句，再判断条件。2. 条件不满足就不执行。循环是指对同一个程序段重复执行若干次，直到指定的条件不满足为止，这段被重复执 行的语句序列被称为循环体，由若干个语句构成。循环结构主要有三种形式：ForNext 循环WhileWend 循环 DoLoop 循环。二 For 循环（最常用的一种格式）1、For 循环语句的格式：For 循环变量=初值
3、To 终值 Step 步长循环体Next 循环变量例如： For I= 1 To 10 Step 1Print “ 你好 ”Next I说明：（1）循环变量：为一个数值型变量。用来控制循环过程。（2）初值：循环变量的初始值，一般为数值型常量、变量。（3）终值：循环变量的终止值，一般为数值型常量、变量。（4）步长：循环变量的增量。其值为正，初值应小于终值（递增循环）；若为负，初值 应大于终值（递减循环）。但步长不能是0。会造成死循环。如果步长是1， Step 1 可省略不 写。(5) 循环体：在For语句和Next语句之间的语句序列，可以是一个或者多个语句。(6) Next:循环终端语句，作为循
4、环结构的边界标志。Next后面的循环变量必须与For 语句中的循环变量相同。2、For循环语句的执行过程如下：( 1)先将初值赋给循环变量，并记住终值和步长。(2) 检查循环变量的值是否超过终值。如果超过就结束循环，执行Next后面的语句； 否则，执行一次循环体。(3) 循环体执行完毕后，执行Next语句，将循环变量增加一个步长后的值再赋给循环 变量，转到步骤( 2)继续执行。3、循环执行过程例题：(1)，编写程序，打印10 次“你好”。For I = 1 To 10 Step 1 Print “ 你好 ”Next I(I 的变化过程：1，2，3，4，5，6，7，8，9, 10)修改：For
5、I = 10 To 19 Step 1 Print “ 你好 ”Next I（I 的变化过程： 10， 11, 12， 13， 14， 15， 16， 17， 18， 19）修改：For I = 10 To 1 Step -1 Print “ 你好 ”Next I（I 的变化过程： 10， 9, 8， 7， 6， 5， 4， 3， 2， 1）修改：For I = 1 To 4.6 Step 0.4 Print “ 你好 ”Next I（I 的变化过程： 1， 1.4， 1.8， 2.2， 2.6， 3， 3.4， 3.8， 4.2， 4.6）（2） 循环变量的变化过程：For I = 1 To
6、 10 Step 1 Print INext I可以看到，循环变量I在循环过程中，每次循环都在变化，这是我们最关注的问题。3)利用循环变量的变化来解决问题：例题：S = 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10循环程序：For I = 1 To 10 Step 1S =S + INext I执行过程(S的初始值为0)第 1 次循环o4Ff XTI=1T QS=S+I7 S - 0 +11QO第2次循环I=2S=S+I、S 1 +23第3次循环I=3S=S+IS 3 +36第4次循环I=4S=S+IS 6 +410第5次循环I=5S=S+IS 10+ 515第
7、6次循环I=6S=S+IS 15+ 621第7次循环I=5S=S+IS 21+ 728第8次循环I=5S=S+IS 28+ 836第9次循环I=5S=S+IS 36+ 945第 10 次循环： I=10 S=S+IS = 45+ 10=55(4) .将10次循环中，每次的I和S的值变化打印出来。For I = 1 To 10 Step 1 S = S + I Print I, SNext IO12345678910 5 18 6 5 5 1361122345Command1. 编写程序：Private Sub Command1_Click()For I = 1 To 10 Step 1S =
8、S + INext IPrint SEnd Sub4循环执行完后，循环变量I的值是一定超过终值的。ForI = 1 To 10 Step 1Print INext IPrint “I=” ; I终值是10,而循环结束后的I值为11（I 的变化过程： 1， 2， 3， 4， 5， 6， 7， 8， 9, 10, 11）For I = 1 To 4.6 Step 0.4Print INext IPrint “I=” ; I终值是4.6,而循环结束后的I值为5(I 的变化过程： 1, 1.4, 1.8, 2.2, 2.6, 3, 3.4, 3.8, 4.2, 4.6, 5)5. 循环次数计算公式：循
9、环次数=（终值初值）/ 步长 + 1如上题： 次数= （10-1）/1 + 1 = 10 ,即10次。6、循环常用于解决如下有规律的数据的计算,累加求和、累乘求积等。. S = 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10. S = 1 + 2 + 3 + 4 + 98 + 99 + 100.S = 1+3 +5 +7+95+ 97+99.S = 12+22 +32 +42+ 52+ 62+ 72+82+ 92+ 102.S = 13+23 +33 +43+ 53+ 63+ 73+83+ 93+ 103.S = 1+1/2+ 1/3+1/4+ 1/5+ 1/6+
10、1/7 + 1/8 + 1/9 + 1/10.S =(1+2)+(2+3+（3+4）+(4+5）+(8+9)+(9+10).S = 1 *2* 3 *4 * 5 *6* 7 *8 * 9 *101 1 1 1 1 1 1 1 1 1 S =+1 + 22 + 33 + 44 + 55 + 66 + 77 + 88 + 99 + 1010 + 11).S = 1 - 2 + 3 - 4 + 5 6 + 7 8 +-98 + 99 -100(11). S = 1+(1*2) + (1*2*3) + (1*2*3*4)+(1*2*3*4*5*6*7*8*9*10)累加求和、累乘求积公式累加公式： S
11、 = S + I累乘公式： P = P* I7. 应用举例：. S = 1 + 2 + 3 + 4 + 98 + 99 + 100For I = 1 To 100 Step 1S = S + INext IPrint S. S = 1 + 3 + 5 + 7 + 95 + 97 + 99 For I = 1 To 100 Step2S = S + I Next I Print S. S = 12 + 22 + 32 + 42 + 52 + 62 + 72 + 82 + 92 + 102 For I = 1 To 10 Step 1S = S + I*I Next I Print S. S =
12、13 + 23 + 33 + 43 + 53 + 63 + 73 + 83 + 93 + 103 For I = 1 To 10 Step 1S = S + I*I*I Next I Print S. S = 1 + 1/2 + 1/3 + 1/4 + 1/5 + 1/6 + 1/7 + 1/8 + 1/9 + 1/10 For I = 1 To 10 Step 1S = S + 1/INext IPrint S. S =(1+2)+(2+3)+(3+4)+(4+5)+(5+6)+(6+7)+(7+8)+(8+9)+(9+10)For I = 1 To 9 Step 1S = S + I+(I
13、+1)Next IPrint S111111111 1.S =+1 + 22 + 33 + 44 + 55 + 66 + 77 + 88 + 99 + 1010 + 11For I = 1 To 10 Step 1S = S + 1/(I+I+1)Next IPrint S. S = 1 - 2 + 3 - 4 + - 98 + 99 -100分成两个算式N= 1 + 3 +5+ + 97 + 99+ 98 +100 )M= - 2 - 4 -6- 98 -100 = -(2 +4 +6+For I = 1 To 99 Step 2N = N + INext IFor I = 2 To 100 Step 2M = M + INext IS= N - M其它解法：解一. s=0for I= 1 to 100s = s + I*(-l)(I+l)next Iprint s解二. s=0 : M=1for I= 1 to 100s = s + I* MM = - Mnext Iprint s. S = 1 * 2 * 3 * 4 * 5 * 6 * 7 * 8 * 9 * 10P=1For I = 1 To 10 Step 1P = P*INext IPrint P8.FOR 循环小结：For 循环语句的格式For 循环变量 = 初值 To 终值 Step 步长
