课件6张PPT。1.2.1输入语句、输出语句和赋值语句珠海市实验中学 卢文伯一、输出语句print一般格式Print “提示内容”;表达式例：print “1+2+3=”;1+2+3
print “3-4=”;3-4
print “3*(-4)=”;3*(-4)
print “3/(-4)=”;3/(-4)
PRINT “sin(π/3)=”;sin(3.14159/3)二、赋值语句一般格式变量=表达式开始A=10B=12输出A+B输出A-B结束第二行改为B=A+5,结果是什么?开始x=1y=x^3+3*x^2-24*x+30 输出y结束当任意输入一个x的值，怎样求y的值呢？三、输入语句一般格式INPUT “提示内容”；变量VB中格式变量=val(text1.text)开始y=x^3+3*x^2-24*x+30 输出y结束输入x练习：输入长方形长与宽，计算长方形的面积。作业：第23页练习第2题，A组第2题小结:赋值语句左边只能为一个变量
如:A+10=A不合法课件8张PPT。顺序结构珠海市实验中学 卢文伯练习:已知一个三角形的三边边长分别为2,3,4,利用海伦公式—秦九韶公式设计一个算法,求出它的面积,画出程序框图。开始p =(2+3+4)/2s=sqr(p*(p-2)*(p-3)*(p-4))输出s结束顺序结构是由若干个依次执行的处理步骤组成的。顺序结构这是任何一个算法都离不开的基本结构。开始p =(2+3+4)/2s=sqr(p*(p-2)*(p-3)*(p-4))输出s结束例1:编写程序，计算一个学生数学、语文、英语三门课的平均成绩。开始输出(a+b+c)/3结束输入c输入a输入b例2:给一个变量重复赋值。开始结束输出AA =10A =A+15例3:交换两个变量A和B的值，并输 出交换前后的值。练习：p23第一题作业：第15页练习第4题课件6张PPT。1.2.2条件语句珠海市实验中学 卢文伯引例:设计一个求任意数的绝对值的算法,并画出程序框图。开始输入a输出a结束a<0?a=-a否格式1: if 条件 then 语句 end if 或: if 条件 then 语句 例1:已知f(x)= 编写一个程序,对每输入一个x值,得到相应的y值。开始输入x输出y结束x<0?y=2*x^2-5否y=x^2-1格式2: if 条件 then 语句1 else 语句2 end if条件结构:算法的流程根据条件是否成立有不同的流向.练习：第20页第2题写法上有点问题,请查出?运行结果是什么?(输入一个数说明)作业：第23页练习第2题，A组第2题课件9张PPT。1.2.2条件语句(2)珠海市实验中学 卢文伯格式1: if 条件 then 语句 end if 或: if 条件 then 语句 例1:已知f(x)= 编写一个程序,对每输入一个x值,得到相应的y值。开始输入x输出y结束x<0?y=2*x^2-5否y=x^2-1格式2: if 条件 then 语句1 else 语句2 end if条件结构:算法的流程根据条件是否成立有不同的流向.条件语句的嵌套: if 条件1 then 语句1 else if 条件2 then 语句2 else 语句3 end if end if开始输入a，b，cd=b^2－4acp= －b/(2a)q=SQR(ABS (d)/(2a))x1=p+q
x2=p －qd≥0x1=x2?原方程有两个不等
的实数根x1、x2原方程有两个相等
的实数根x1、x2原方程无实数根结束是否是否例5:编写程序,输入一元二次方程的系数,输出它的实数根。练习：第二教材P15例2及变式引申 （指出程序错误）开始t=a,a=b,b=tt=a,a=c,c=tt=b,b=c,c=t输入a，b，c输入a，b，cb＞a?c＞a?c＞b?结束是是否否是否例6：编写程序，使得任意输入 的3个整数按从大到小的顺序输出。练习：第20页第2题写法上有点问题,请查出?运行结果是什么?(输入一个数说明)作业：B组第2题课件6张PPT。1.2.3循环语句(1)珠海市实验中学 卢文伯While 条件 循环体 Wend 1+2+3+….+100=? (1). While循环语句(当循环)当条件满足时，执行循环体，不满足退出循环。开始i=1sum=0i=i+1sum=sum+ii≤100?输出sum结束否是1+2+3+….+100=?第一步: i=1
第二步: Sum=0
第三步: 若满足i<=100, 则执行下一步（进入循环），i超过100转到第六步，即退出循环。
第四步: Sum=sum+i
第五步: i =i+1 (i增加1),转到第三 步。
第六步：输出sum
Do 循环体 Loop Until 条件 1+2+3+….+100=? (2). Until循环语句(直到型循环)先执行循环体，直到条件满足时，退出循环。开始i=1sum=0i=i+1sum=sum+ii>100?输出sum结束否是1+2+3+….+100=?第一步: i=1
第二步: Sum=0
第三步: Sum=sum+i
第四步: i =i+1 (i增加1),转到第三 步。
第五步: 若不满足i>100, 则执行第三步（进入循环），满足>100退出循环。
第六步：输出sum
练习：(1)1+1/2+1/3+…..+1/100=?
(2)1^2+2^2+….+50^2=?
(2)第二教材P26A基础训练作业：第23页练习第3题，A组第4题课件9张PPT。1.2.3循环语句(2)珠海市实验中学 卢文伯While 条件 循环体 Wend(1). While循环语句(当循环)当条件满足时，执行循环体，不满足退出循环。1.复习开始结束用While当循环1+2+3+….+100=?Do 循环体 Loop Until 条件(2). Until循环语句(直到型循环)先执行循环体，直到条件满足时，退出循环。开始用Until直到型循环1+2+3+….+100=?练习：
(1)1^2+2^2+….+50^2=?
(2)1×2×3×…×100=?例：编写程序,计算 f(x)=x -3x+5,当x=1,2,3,…,20时的函数值。算法1用顺序结构2算法2用循环结构Private Sub Command1_Click()
i = 1
While i <= 20
x = Val(InputBox("x="))
y = x ^ 2 - 3 * x + 5
Print "f("; x; ")="; y
i = i + 1
Wend
End Sub例2:编写程序找出乘积为399的两个相邻奇数并输出?开始用Until直到型循环n=1n=n+2s=n*(n+2)S=399?输出n,n+2结束否是课件5张PPT。1.3算法案例(1)珠海市实验中学 卢文伯案例1: 辗转相除法与更相减损术例1: 求18与30的最大公约数。18与30的最大公约数是2×3=630=18×1+12 ∴18与12是30与18的公约数18=12×1+6 ∴12与6是18与12的公约数12=6×2 (余数为0) ∴6是12与6的公约数算法2:18与30的最大公约数是6这种算法叫辗转相除法可用辗转相除法求最大公约数。例2: 求8251与6105的最大公约数。8251=6105×1+2146 ∴6105与2146的公约数也是8251与6105的公约数6105=2146×2+1813 ∴2146与1813的公约数也是6105与2146的公约数2146=1813×1+333 ∴1813与333的公约数也是2146与1813的公约数1813=333×5+148 ∴333与148的公约数也是1813与333的公约数333=148×2+37 ∴148与37的公约数也是333与148的公约数148=37×4(余数为0) ∴37是148与37的公约数 ∴37是8251与6105的最大公约数辗转相除法算法2: 更相减损术程序在第二教材P25,请同学们画出它的框图。用While（当循环）程序在第二教材P24,请同学们画出它的框图。课件6张PPT。1.3算法案例(2)珠海市实验中学 卢文伯一、复习：案例1: 辗转相除法与更相减损术例1: 求18与30的最大公约数。18与30的最大公约数是2×3=630=18×1+12 ∴18与12是30与18的公约数18=12×1+6 ∴12与6是18与12的公约数12=6×2 (余数为0) ∴6是12与6的公约数算法2:18与30的最大公约数是6这种算法叫辗转相除法辗转相除法算法1: 把x=5代入f(x),计算各项的值。然后加起来。这时一共做了1+2+3+4=10次乘法运算，5次加法运算。二、案例2:秦九韶算法有没有更有效的算法呢?1.先计算最内层v1=a5x+a4的值.2.计算v2=v1x+a3的值.3.计算v3=v2x+a2的值.4.计算v4=v3x+a1的值.5.计算v5=v4x+a0的值.这种方法叫秦九韶算法输入f (x)的系数：
a(0)、a(1)、a(2)、a(3)、a(4)、a(5)输入x0i=1v=a(5)i=i+1v= v·x0+a(5-i)i ≤5?输出v结束否是定义数组a(5)Dim a(6) As Integer
x0 = Val(Text1.Text)
For i = 0 To 5
a(i) = Val(InputBox("a(" + Str(i) + ")="))
Next
i = 1
v = a(5)
While i <= 5
v = v * x0 + a(5 - i)
i = i + 1
Wend
Print "多项式的值为："; v
