(
课件网) 枚举算法———For语句 欢迎各位同学通过空中课堂一起来学习! 目录 DIRECTORY 考试要求 学习重点 学习难点 01 02 03 04 课前练习 05 课堂练习 06 课后巩固 考试要求 01 01 考试要求 1.枚举算法思想 (c) 2.For语句 (c) 学习重点 02 02 学习重点 1．掌握枚举算法思想。 2．掌握For语句的格式和用法。 学习难点 03 03 学习难点 1．For语句的用法。 2. 学会使用For语句解决实际问题。 课前练习 04 1.某城市的出租车计费标准为起步价10元（3公里内，含3公里），在3公里到10公里之间每公里2.1元，超过10公里部分每公里3元。另外，里程超过3公里，等待时间也要计费，累计等待时间每4分钟，折算成里程1公里（即2.1元），不足4分钟部分不计费。 课前练习 04 1.某城市的出租车计费标准为起步价10元（3公里内，含3公里），在3公里到10公里之间每公里2.1元，超过10公里部分每公里3元。另外，里程超过3公里，等待时间也要计费，累计等待时间每4分钟，折算成里程1公里（即2.1元），不足4分钟部分不计费。 课前练习 04 Dim s As Integer, t As Integer, m As Single s = ① ‘输入路程 t = ② ‘输入时间 If ③ Then m = 10 ElseIf ④ Then m = 10 + (s - 3) * 2.1 + (t \ 4) * 2.1 Else m = ⑤ _ End If Label3.Caption = ⑥ _ 1.某城市的出租车计费标准为起步价10元（3公里内，含3公里），在3公里到10公里之间每公里2.1元，超过10公里部分每公里3元。另外，里程超过3公里，等待时间也要计费，累计等待时间每4分钟，折算成里程1公里（即2.1元），不足4分钟部分不计费。 课前练习 04 Dim s As Integer, t As Integer, m As Single s = Val(Text1.Text) t = Val(Text2.Text) If s <= 3 Then m = 10 ElseIf s <= 10 Then m = 10 + (s - 3) * 2.1 + (t \ 4) * 2.1 Else m = 10 + 7 * 2.1 + (s - 10) * 3 + (t \ 4) * 2.1 End If Label3.Caption = Str(m) 2.有如下程序段 s=0 For i=1 to 5 step2 s=s+i Next i 该程序运行后，s的值是_____ 课前练习 04 9 1．循环结构 循环结构是程序的基本结构之一。所谓循环，就是重复的执行某些操作，直到指定的条件满足为止。 2．For循环语句 如果事先已知循环次数，则可使用For－Next循环结构语句。它的一般格式如下： For 循环变量＝初值 to 终值 [Step步长] [循环体] [Exit For] Next循环变量 新课讲授 For i=1 to 100 s=s+i Next i step 2 ①循环变量是数值变量，一般为整数型。初值和终值各是一个数值表达式。步长为循环变量的增量，是一个数值表达式。其值可以是正数(递增循环)，也可以是负数(递减循环)，但不能是0。如果省略步长，则步长为1。 ②For－Next循环遵循“先检查、后执行”的原则，即先检查循环变量是否超过终值，然后决定是否执行循环体。 新课讲授 For i=10 to 1 Step 1 s=s+i Next i For i=10 to 1 Step -1 s=s+i Next i 1.有如下程序段 a=1:b=2 For i=1 to 3 b=b+a a=a+b Next i 该程序运行后，b的值是_____ 课堂练习 18 2.以下程序段执行后整型变量n 的值为( ) n=0 for i=1 to 20 step 5 n=n+i next i A. 50 B. 34 C. 15 D. 210 课堂练习 B 3.下面程序是计算1-50中,能被3整除的所有整数之积，请在_____内填入适当的代码。 Private Sub Form_load() Dim x As Integer, s As Double s = _____ For x = _____ If _____ Then _____ Next x Text1.text=s End Sub 课堂练习 枚举就是将问题的可能解一个个地列举，逐一判断，即使中途找到符合的解也要继续找下去，将所有可能都找完才结束。 枚举算法又叫穷举算法，其基本思想是把问题所有的解一一地罗列出来，并对每一个可能解进行判断，以确定这个可能解是否是问题的 ... ...
