第二节程序的基控制结构.pptVIP

* * 第二节程序的基本控制结构 教学目标: 1、了解程序的概念； 2、理解程序的三种结构； 3、学会运行程序 一元二次方程： X1= b – 4ac -b + 2a 2 X2= b – 4ac 2 -b – 2a ax2 + bx + c = 0 (a≠0) 方程的解: 条件:当 b2 - 4ac ≥ 0 时 1x2+5x+ 4 =0 2x2+ 3x – 2 =0 2x2-15x+50=0 46x2+8x-29=0 15x2+216x-123=0 2390x2+545x-625=0 ……. 求下列一元二次方程的解 一、程序的概念： 程序是一系列有序语言的集合。换句话说，程序是能被计算机执行的步骤，其功能是用来解决某个实际问题，实现人们想要达到的目的、想法。 二、程序的三种基本控制结构：顺序结构、分支结构、循环结构 执行语句a 执行语句b 开始 结束 顺序结构 语句2 语句1 条件 N Y 开始 结束 执行a 执行b 条件 开始 结束 N Y 分支结构 循环结构 X1=-1 X2=-4 c 4 b 5 a 1 例1：求解1x2+5x+4=0。程序段如下： １、顺序结构:按语句的先后次序依次执行的程序控制结构。 说明： 数学中的等号“＝”是恒等关系；而在程序中的“＝”是赋值关系． x1、x2← … Sub pro1() a=1 　　　 b=5 c=4 p=b*b-4*a*c x1=(-b+Sqr(b*b-4*a*c))/(2*a) x2=(-b-Sqr(b*b-4*a*c))/(2*a) MsgBox(“x1=”+Str(x1)+Chr(13)+“x2=”+Str(x2)) End Sub Sqr函数是开平方 MsgBox()函数负责将括号中的字符显示在一个对话框中。 Str()函数负责将括号中的整数转换成字符串。 开始 显示x1,x2的值 结束 例2：解方程2x2-15x+50=0，判断当△≥时，有两个实根， 否则，无解。 Sub pro2() a=2 b=-15 c=50 p=b*b-4*a*c If p=0 then x1= (-b+Sqr(b*b-4*a*c))/(2*a) x2= (-b-Sqr(b*b-4*a*c))/(2*a) MsgBox(“x1=”+Str(x1)+Chr(13) +“x2=”+Str(x2)) Else MsgBox(“无解”） End if End Sub Sub pro1() a=2 　　　 b=-15 c=50 p=b*b-4*a*c x1=(-b+Sqr(b*b-4*a*c))/(2*a) x2=(-b-Sqr(b*b-4*a*c))/(2*a) MsgBox(“x1=”+Str(x1)+Chr(13) +“x2=”+Str(x2)) End Sub ２、分支结构：分支结构又称选择结构。根据条件判断是否成立，从而选择程序执行的方向，执行其中的一个分支。 语法：(1) If 条件　Then 语句 End If 语法(2) 　If 　条件　Then 语句1 　Else 语句2 　End If 语句2 语句1 条件 N Y 结束 开始 语句1 条件 N Y 结束 开始 开始 a 2 计算x1,x2 结束 Y N b -15 c 4 计算p p=0吗？ 显示x1,x2的值 显示“无解“ 例2：解方程2x2-15x+50=0，当△≥时，有两个实根，否则，无解。 Sub pro2() a=2 b=-15 c=50 p=b*b-4*a*c If p=0 then x1= (-b+Sqr(b*b-4*a*c))/(2*a) x2= (-b-Sqr(b*b-4*a*c))/(2*a) MsgBox(“x1=”+Str(x1)+Chr(13) +“x2=”+Str(x2)) Else MsgBox(“无解”） End if End Sub Sub pro2() for i=1 to 3 a=Inputbox(“a=“) b=Inputbox(“b=“) c=Inputbox(“c=“) p=b*b-4*a*c If p=0 then x1=