- 1、本文档共19页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
1.2.2条件语句 作业 学习指导:13-15页 活页卷66页 函数y= 函数y= * * * * * 一、条件语句 满足条件? 是 否 步骤 IF 条件 THEN 语句体 END IF 例如:编写一个程序,从键盘上输入一个整数,若是正数就将其输出。 程序: INPUT “x=” ;x IF x0 THEN PRINT x END IF END 满足条件? 是 否 格式二: 步骤二 步骤一 IF 条件 THEN 语句体1 ELSE 语句体2 END IF 例如:编写求一个数是偶数还是奇数的程序,从键盘上输入一个整数,输出该数的奇偶性。 程序:INPUT “x=”;x y= x MOD 2 IF y=0 THEN PRINT x ; “is an even number” ELSE PRINT x ; “is an odd number” END IF END 1、编写一个程序,求任意实数的绝对值。 INPUT “x=”;x IF x0 THEN y=-x ELSE y=x END IF PRINT “︱x︱=”;y END 程序如下: 程序框图: 开始 输入 x y=-x y=x 输出 y 结束 x0? 是 否 条件结构两种格式 IF 条件 THEN 语句体1 ELSE 语句体2 END IF IF 条件 THEN 语句体 END IF 满足条件? 语句1 语句2 是 否 满足条件? 语句 是 否 小结: 例6 编写程序,输入一元二次方程 自然语言描述: 每一步:输入a,b,c 第二步:计算判别式△ 第三步:如果△0有两不同实根, △=0有两个相同实根, △0否则没实数根。根据情况输出结果。 开 始 输入a,b,c Δ=b2-4ac p= -b/2a q=√Δ/(2a) x1=p+q x2=p-q Δ≥0? x1=x2? 原方程有两个不等 的实数根x1,x2 原方程有两个相等 的实数根x1,x2 原方程无实数根 结 束 是 否 是 否 的系数,输出它的实数根。 程序框图: INPUT “a,b,c=“;a,b,c d=b*b-4*a*c IF d=0 THEN p=-b/(2*a) q=SQR(d)/(2*a) IF d=0 THEN PRINT “x1=x2=”;p ELSE PRINT x1=p+q,x2=p-q END IF ELSE PRINT “No real root.” END IF END 原方程有两个相等 的实数根p 输入a,b,c Δ=b-4ac Δ≥ 0 p= -b/(2a) q=√Δ/(2a)) Δ=0? x1=p+q x2=p -q 原方程有两个不等 的实数根x1、x2 原方程无实数根 结束 是 否 是 否 例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 写出求函数的函数值的程序. 解:INPUT x IF x0 THEN y=1 ELSE IF x=0 THEN y=0 ELSE y=-1 END IF END IF PRINT y END 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 相应的QBASIC程序: 开始 t=a, a=b, b=t t=a, a=c, c=t t=b, b=c, c=t 输入a,b,c 输入a,b,c b>a? c>a? c>b? 结束 是 是 否 否 是 否 对应的流程图: 写出求函数的函数值的程序. 解:INPUT x=”;x IF x=
文档评论(0)