程序的基本结构(循环结构)ppt课件

上传人:我*** 文档编号:149208395 上传时间:2020-10-25 格式:PPT 页数:36 大小:695.50KB
返回 下载 相关 举报
程序的基本结构(循环结构)ppt课件_第1页
第1页 / 共36页
程序的基本结构(循环结构)ppt课件_第2页
第2页 / 共36页
程序的基本结构(循环结构)ppt课件_第3页
第3页 / 共36页
程序的基本结构(循环结构)ppt课件_第4页
第4页 / 共36页
程序的基本结构(循环结构)ppt课件_第5页
第5页 / 共36页
点击查看更多>>
资源描述

《程序的基本结构(循环结构)ppt课件》由会员分享,可在线阅读,更多相关《程序的基本结构(循环结构)ppt课件(36页珍藏版)》请在金锄头文库上搜索。

1、2.3 程序的基本结构,程序的基本结构,1、顺序结构:按照由上到下的顺序一行一行的执行。程序中没有分支,没有重复。 2、选择结构:也叫分支结构,根据不同的条件判断来决定程序走向结构。 3、循环结构:根据条件判断,需要重复执行某一段代码的程序。程序中可能存在分支和重复。,顺序结构的特点: 1. 执行过程是按顺序从第一条语句执行到最后一条语句。 2. 在程序运行的过程中,顺序结构程序中的任何一条语句都要运行一次,而且也只能运行一次。,顺序结构,顺序结构是最简单的程序结构,它是由若干个依次执行的处理步骤组成的。如图,A语句和B语句是依次执行的,只有在执行完A语句后,才能接着执行B语句。,顺序结构,举

2、例: 输入两个数,然后交换这两个数,再输出它们交换后的结果。 (1)分析问题。 要交换两个数,要利用几个变量来保存数据?,1、顺序结构,(2)分析程序的执行步骤,画出流程图。 第一步:输入两个变量a、b的值。 第二步:利用第三个变量c来进行交换,交换的过程如下: c=a a=b b=c 第三步:输出交换后a、b的值。,顺序结构,(3)讲解程序的编写。 Private Sub command1_Click() Dim a as single, b as single, c as single a=val(InputBox(输入第一个数a:)) b=val(InputBox(输入第二个数b:))

3、Print 交换前:a=;a, b=; b c=a a=b b=c MsgBox 交换后a= 是偶数。 Else Print N;是奇数。 End If End Sub,选择结构,课堂练习,1、输入课本33页代码,进行连个数的交换 2、编写代码:输入一个数,判断它的奇偶性。,If 语句:单分支、双分支与多分支语句,单分支形式:If then 语句或与语句组 End If 如: If (N mod 2 = 0) Then Print N; 是偶数。 Else,选择结构的分支语句,双分支形式:If then 语句或与语句组1 Else 语句或与语句组2 End If 如: If (N mod 2=

4、0) Then Print N; 是偶数。 Else Print N;是奇数。 End If,选择结构,双分支结构举例:课本34页,输入飞船速度,判断飞船是否能升空。 (飞船运行状态判断: 只有当飞船的速度达到第一宇宙速度(7.9千米/秒)时,才可以在地球吸引力作用下,绕地球近似做匀速圆周运动。),代码如下: private Sub cmdOk_Click() Dim v As Single v = Val(InputBox(输入速度(km/s)) If v = 7.91 Then lblshow.Caption = 飞船成功飞行! Else lblshow.Caption = 飞船不能升空!

5、 End If End sub,表2-11 飞船的飞行状况,选择结构,多分支形式:If then 语句或与语句组1 Else 语句或与语句组2 . End If,用If 多分支 语句判断飞船飞行状况,Private Sub command_Click() Dim v As Single v = Val(InputBox(输入速度(km/s):) If v 16.67 Then Print 飞船挣脱太阳吸引力飞出太阳系 Else If v = 11.19 Then Print 飞船离开地球的控制,围绕太阳转 Else If v = 7.91 Then Print 飞船绕地球近似做匀速圆周运动;

6、Else Print 输入数据错误 End If End If End If End sub,当程序出现多分支选择时,用if语句会比较繁琐,而使用多分支选择select case 语句就方便多了。,语法格式: select case 表达式 case 表达式列表1 语句组1 case 表达式列表2 语句组2 . case else 语句组n end select,用select case 语句判断飞船飞行状况,Private sub cmdOk_click Dim v as single v = val(InputBox(输入速度v(km/s) select case v case Is 16

7、.67 lblshow.caption = 太阳飞出太阳系 case Is =11.19 lblshow.caption = 绕太阳运行 case Is =7.91 lblshow.caption = 绕地球运行 case else lblshow.caption = 数据输入错误 End select End sub,课后练习-用select case语句编写以下代码,例子: 输入一学生的成绩,评定其等次。方法是:90100分为优秀,8089分为良好,7079分为中等,6069分为及格,60分以下为不及格。,课后练习-用select case 语句编写成绩等次:,private sub co

8、mmand_click dim x as single x = val(inputbox(输入一个分数:) select case x case is =90 lblshow.caption = 优秀 case is =80 lblshow.caption = 良好 case is =70 lblshow.caption = 中等 case is =60 lblshow.caption = 及格 case else lblshow.caption = 不及格 end select end sub,代码如下:,private Sub command_Click() Dim x As Single

9、 x = Val(InputBox(输入一个分数:) If x = 90 Then Print 优秀 Else If x = 80 Then Print 良好 Else If x = 70 Then Print 中等 Else If x = 60 Then Print 及格 Else Print 不及格 End If End If End If End If end sub,课后练习,用If和select case多分支语句编写程序代码: 输入一学生的成绩,评定其等次。方法是:90100分为优秀,8089分为良好,7079分为中等,6069分为及格,60分以下为不及格。 (代码编写参照课本36

10、页),小结分支结构的特点: 分支结构是根据不同的条件判断来决定程序执行走向的结构。 在程序运行的过程中,在分支结构内,无论P条件是否成立,只能执行A操作或B操作之一,不可能既执行A操作又执行B操作,也不可能A操作和B操作都不执行。,选择结构,有时在解决一些问题时,经常需要重复执行一些操作,如计算123+100的和,我们可以利用循环结构控制程序按照一定的条件或者次数重复执行。 需要重复执行同一操作的结构称为循环结构,即从某处开始,按照一定条件反复执行某一处理步骤,反复执行的处理步骤称为循环体。,循环结构,应用举例:累加求和。 题目:计算123+10的和。 (1)分析问题。 提示进行累加运算,可先

11、设累加变量的值为0,还要准确理解循环次数,避免出现多一次循环或少一次循环的情况。,循环结构,(2)分析程序的执行步骤,画出流程图。 第一步:使累加变量S的值为0; 第二步:循环变量i的初值为1,终值为10,步长值为1; 第三步:判断循环条件i10是否成立,成立,则输出累加变量S的值,否则S=S+i,i=i+1,重复第三步。,循环结构,题目:计算123+10的和。,计算步骤:设循环次数为i,累加量为s=0(初始值) 循环次数: s i=1: 1 i=2: 1+2=3 i=3: 3+3=6 i=4: 6+4=10 i=5: 10+5=15 i=6: 15+6=21 i=7: 21+7=28 i=8

12、: 28+8=36 i=9: 36+9=45 i=10: 45+10=55 i=11(i10) End(退出 ),循环体:s=s+i 循环次数:i=i+1,(3)讲解程序的编写。 Private Sub command1_Click() Dim i As Integer,s As Integer S = 0 For i = 1 To 10 Step 1 S = S + i Next i Print 1+2+3+10的和是; S End Sub,循环结构:用for.Next 语句,(4)讲解程序的编写。 Private Sub command1_Click() Dim i As Integer,

13、 s As Integer i = 0 s = 0 Do While s = 1000 i = i + 1 s = s + i Loop lblSum.Caption = i sum End sub,用VB的循环语句求1到10的偶数积与奇数和,Private Sub Command1_Click() Dim i As Integer, sum As Integer, aa As Double aa = 1 For i = 1 To 10 If i Mod 2 = 0 Then aa = aa * i Else sum = sum + i End If Next i Print aa, sum

14、End Sub,小结循环结构的特点: 循环结构中通常都有一个起循环计数作用的变量,这个变量的取值一般都包含在执行或终止循环的条件中。 循环结构主要用在一些有规律的重复计算的算法中,例如累加求和、累乘求积等问题。,循环结构,小结顺序、分支和循环三种程序基本控制结构的共同特点: 三种结构都是只有一个入口,一个出口。 三种结构内都不存在死循环,即无终止的循环,像下图的结构中就存在一个死循环,在程序中是不允许死循环出现的。,总结,总结,本节课我们学习了三种结构:顺序结构、分支结构和循环结构。 顺序结构:按照由上到下的顺序一行一行地执行的程序结构。 分支结构:根据不同的条件判断来决定程序执行走向的结构。 循环结构:需要重复执行同一操作的程序结构称为循环结构。 我们灵活运用这三种基本结构,就可以编写出各种各样的程序,解决许多实际的问题。,服务理念中的“点点” 理解多一点 真情浓一点 学习勤一点 品质高一点 理由少一点 效率高一点 处理问题灵活点 工作过程用心点 对待同事宽容点 互相协作快乐点,

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 办公文档 > PPT模板库 > PPT素材/模板

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号