1、4.1 编制计算机程序解决问题编制计算机程序解决问题安丘二中 李永亮l1、了解编制程序的基本过程。l2、掌握算法的三种基本逻辑结构，能分析简单的程序。l3、激发同学们对算法设计和程序编写的兴趣，提高信息素养。教学目标算法的三种基本逻辑结构l1、顺序结构l2、分支结构l3、循环结构合作探究1、顺序结构：、顺序结构：是程序设计中最基本、最简单的结构。程序按照语句出现的先后顺序依次执行。顺序结构是任何程序的基本结构，即使在分支结构和循环结构中也包含有顺序结构。没有固定的语句格式。合作探究语句序列1语句序列2语句序列n程序入口程序入口程序出口程序出口合作探究顺序结构举例（一）Print a1,(3 2
2、)Print a2,(32)Print a3,安丘安丘+二中二中Print a4,安丘安丘&二中二中程序入口程序入口程序出口程序出口Private sub form_click()Print a1,(3 2)Print a2,(32)Print a3,安丘安丘+二中二中 Print a4,安丘安丘&二中二中End sub 合作探究Private Sub Command1_Click()Dim x As Integer,y As Integerx=1:y=0Do If x Mod 3=1 Then If x Mod 5=2 Then If x Mod 7=4 Then y=x End If En
3、d If End If x=x+1 Loop Until y 0 Print 韩信统帅士兵数韩信统帅士兵数:;yEnd Sub顺序结构举例（二）Dim x As Integer,y As Integerx=1:y=0循环语句循环语句 do loop until 条件条件 Print 韩信统帅士兵数韩信统帅士兵数:;y程序入口程序入口程序出口程序出口2、分支结构：、分支结构：使程序依据预定的条件成立与否，决定执行哪个分支，而且同一时间只允许执行一个分支。语句格式语句格式:if then 语句序列1 else 语句序列2 End if 合作探究语句序列1语句序列2程序入口程序入口程序出口程序出口条
4、件分支结构举例合作探究Private sub form_click()Dim x as single,ABSX as single X=inputbox(“请输入一个数请输入一个数”）If x=0 then ABSX =x else ABSX =-x Endif Print “?x?=“,ABSXEnd sub 求一个数的绝对值。求一个数的绝对值。Absx=xAbsx=-x程序入口程序入口程序出口程序出口X=0Print“?x?=“,ABSX3、循环结构：循环结构：依据判断条件成立于否，反复执行循环结构中的某一功能（即循环体），直到条件不成立，退出循环为止。合作探究语句序列1程序入口程序入口程
5、序出口程序出口条件循环体Private Sub Command1_Click()Dim x As Integer,y As Integerx=1:y=0Do If x Mod 3=1 Then If x Mod 5=2 Then If x Mod 7=4 Then y=x End If End If End If x=x+1 Loop Until y 0 Print 韩信统帅士兵数韩信统帅士兵数:;yEnd Sub循环结构举例（一）合作探究语句格式1:do 循 环 体 loop until 条件A 只要条件不成立只要条件不成立或者说不满足，程或者说不满足，程序就运行循环体语序就运行循环体语句。
6、句。Private Sub Command1_Click()Dim i,s as intS=0For i=1 to 99 step 2S=.Next iPrint“s=“,s End Sub拓展提升例1：请将计算1+3+5+99的值的程序补充完整。循环结构语句格式2:for i=to step s+i拓展提升例2：在下面程序框图中，循环执行的次数是（）50Private Sub Command1_Click()Dim i,s as int i=2:s=2 Do s=s+i i=i+2 Loop until i100 Print“s=“,s End Sub开 始i=2,s=2i=i+2s=s+i
7、i100输出结 束是否1、请写出下面程序的运行结果。Private Sub Command1_Click()Dim a,b,c,m As Int a=15 b=60 c=38 if a c then m=c Print“m=;mEnd Sub m=15自主探究2、写出下列程序的运行结果：Private sub form_click()S=1 For i=1 to 4 s=s*i next i print “s=“,s End sub S=24自主探究小结小结 编制计算机程序解决问题编制计算机程序解决问题l用计算机程序解决问题的基本过程用计算机程序解决问题的基本过程l能够读懂简单的计算机程序。能够读懂简单的计算机程序。l程序的概念、程序设计语言程序的概念、程序设计语言
