for循环语句技术总结.ppt

两种累加 求1+2+3+4+5+6+7+8+9 两种累加 求1+3+5+7+9+11+13+15+17 有如下Visual Basic程序段： s = 0 For i = 0 To 4 s=s+2^i Next i 该程序段运行后，变量s的值为___________。 计算表达式2-2+2-1+20+21+22+23的值 S=0 For i＝ s=s+2^i Next i 下列Visual Basic程序的功能是：计算表达式12+42+72+…+972的值，并在文本框Text1中输出表达式的值。为了实现这一目标，程序中For语句应为__________________。 Private Sub Command1_Click() Dim sum As Long Dim i As Integer sum = 0 For i = sum = sum + i*i Next i Text1.Text = Str(sum) End Sub 有如下Visual Basic程序段： s = 0 For i = 1 To 10 If i Mod 3 = 0 Then s = s + i Next i 该程序段运行后，变量s的值为 以下Visual Basic程序的功能是：找出自然数1-100之间被3整除的数，并在文本框Text1中输出这些数的累加和。为了实现这一功能，程序中划线处的语句应更正为_____________。 Private Sub Command1_Click() Dim i As Integer, sum As Integer sum = 0 For i = 1 to 100 If i Mod 3=0 Then sum = sum + 3 Next i Text1.Text=Str(sum) End Sub For 循环变量=初值 to 终值 step 步长 语句块 next 循环变量 循环变量 一般情况下为整数，可以是正数或负数 步长 可以是正数或负数，但不能为0 步长为1时，“step 1”可以不写 循环次数 循环次数=int（（终值-初值）/步长）+1 课堂任务_求因子 Private Sub Command1_Click() Dim n As Integer Dim c As Integer Label1.Caption = 设置label的caption为空 n = Val(Text1.Text) 保存输入的值到变量n中 c = 0 设置因子个数为0 _______________ If n Mod i = 0 Then 如果n能被i整除,那么i就是n的一个因子 c = c + 1 因子的个数加1 Label1.Caption = Label1.Caption + Str(i) ‘在label1中增加显示一个因子 End If _______________ Label2.Caption = Str(c) 显示因子的个数 End Sub www.art-com.co.kr Copyright ? by ARTCOM PT All rights reserved. Company Logo 算法与程序设计 For 循环语句 DO while 条件表达式 循环语句 Loop 当条件表达式满足的时候,执行循环语句 遇到loop重新判断条件表达式 当条件表达式不满足,则退出整个循环 循环的次数不确定 Do While 循环 Sum=0 n=1 Do While n=9 sum=sum+n n=n+1 loop sum=0 For n=1 to 9 step 1 sum=sum+n next n For 循环变量=初值 to 终值 step 步长 语句块 next 循环变量 使用循环变量控制循环的次数(范围) Step表示循环变量变化的步长（可正可负） 当step为正数时： 当循环变量小于终值的时候,执行循环 当循环变量大于终值的时候,则退出整个循环 For 循环 sum=0 n=1 Do While n=17 sum=sum+n n=n+2 loop Sum=0 For n=1 to 17 step 2 sum=sum+n Next n For 循环变量=初值 to 终值 step 步长 语句块 next 循环变量 使用循环变量控制循环的次数 当循环变量小于或等于终值的时候,执行循环 当循环变量大