算法基本语句(第二课时)

算法基本语句(第二课时)

复习巩固1、输入语句、输出语句和赋值语句对应于算法中的哪种结构？这 三种语句的一般格式是什么？ 顺序结构 输入语句 输出语句 赋值语句 INPUT “提示文字”;变量 PRINT “提示内容”;变量 变量=表达式

2、什么是条件结构？用程序框图表示这种结构否 满足条件？

是语句1 语句2

新课讲解阅读P16,思考以下问题 1、条件结构用怎样的程序语句来描述？这种语句的一般格式是怎样的？ IF 条件 THEN 语句1 ELSE 语句2 END IF IF 条件 THEN 语句 END IF

或

2、把下列语句的意义翻译成程序框图 (1)IF x>0 THEN y=1 ELSE y=0 END IF (2)IF x<0 THEN x=ABS(x) END IF PRINT“x的绝对值为：”;x

开始

例5 编写程序，输入一元二次方程

ax bx c 02

输入a,b,c Δ=b2-4ac p= -b/2a

的系数，输出它的实数根。 算法描述： S1:输入a,b,c S2:计算判别式△ S3:如果△<0有两不同实根， △=0有两个相同实根， △<0 否则没实数根。根据情况输出 结果。

q=SQR(ABS (Δ))/(2a)Δ≥0?是

否

x1=p+q x2=p-q是

x1=x2?否

原方程无实数根

原方程有两个相等 的实数根x1,x2

原方程有两个不等 的实数根x1,x2

结束

QBASIC程序：INPUT “请输入一元二次方程的系数a,b,c=:”;a,b,c d=b*b-4*a*c p = -b / (2 * a) q = SQR(ABS(d)) / (2 * a) IF d >= 0 THEN x1 = p + q x2 = p - q IF x1 = x2 THEN PRINT “只有一个实根：”;x1=x1 ELSE PRINT “有两个实根：”;“x1=”;x1,”x2=”;x2 END IF ELSE PRINT “没有实根” END IF END

例6 编写程序,使得任意输入3个整数按大到小的顺序输出。算法分析：算法思想：3个数两两比较，确定大小。按a、b、c输入，要按a、b、c 输出，关键要找到最大值，将它赋值给a,中值赋给b,最小值赋给c。 第一步 第二步 第三步 第四步 第五步 输入3个整数a、b、c 将a与b比较，并把小者赋给b,大的赋给a; 将a与c比较，并把小者赋给c,大的赋给a 将b与c比较，并把小者赋给c,大的赋给b 按顺序输出a,b,c

相应的QBASIC程序： INPUT “a,b,c=”;a,b,c IF b > a THEN t=a a=b b=t END IF IF c > a THEN t=a a=c c=t END IF IF c > b THEN t=b b=c c=t END IF PRINT a,b,c END

开始 输入a,b,c b>a?否 是 是

对应的流程图

t=a,a=b,b=t

c>a?否

t=a,a=c,c=t是

c>b?否

t=b,b=c,c=t

输入a,b,c

结束

练习巩固 (1)开始

该程序框图所表示的算法是作 用是什么？并根据程序框图写出相 应的程序。

输入a,b,c

a+b>c,a+c > b, b+c > a是否同时成立？

否

是 存在这样的 三角形 不存在这样 的三角形

结束

2、某快递公司规定甲、乙两地之间物品的托运费用根据下面的方法计算： 物品重量在50千克以内，托运费为每千克 0.53 元

,超过的话，超过部分每 千克0.85元，试画出计算费用f的程序框图，并写出相应的QBASIC程序。 程 序 框 图 ：开始

对应的QBASIC程序

输入重量G 否 G<=50 是 M=0.53*G M=50*0.53+0.85*(G-50)

INPUT “输入重量G=”;G IF G<=50 THEN M=0.53*G ELSE M=50*0.53+0.85*(G-50) END IF PRINT “运费为：”;M END

输出运费M

结束

小结1、条件结构的程序表示IF 条件 THEN 语句1 ELSE 语句2 满足条件？ END IF IF 条件 THEN 语句 END IF语句

否 满足条件？ 是

语句1

语句2

2、注意书写的规范性

作业布置 课本P20 练习第3、4题

课外活动 试查找数学课本一些分段函数的事例，看看能否 能用条件语句写出解决问题的程序