资源描述:
《1.2.2条件语句-》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、一、条件语句1.2.2条件语句满足条件?是否步骤IF条件THEN语句体ENDIF例如:编写一个程序,从键盘上输入一个整数,若是正数就将其输出。程序:INPUT“x=”;xIFx>0THENPRINTxENDIFEND满足条件?是否格式二:步骤二步骤一IF条件THEN语句体1ELSE语句体2ENDIF例如:编写求一个数是偶数还是奇数的程序,从键盘上输入一个整数,输出该数的奇偶性。程序:INPUT“x=”;xy=xMOD2IFy=0THENPRINTx;“isanevennumber”ELSEPRINTx;“isa
2、noddnumber”ENDIFEND1、编写一个程序,求任意实数的绝对值。INPUT“x=”;xIFx<0THENy=-xELSEy=xENDIFPRINT“︱x︱=”;yEND程序如下:程序框图:开始输入xy=-xy=x输出y结束x<0?是否条件结构两种格式IF条件THEN语句体1ELSE语句体2ENDIFIF条件THEN语句体ENDIF满足条件?语句1语句2是否满足条件?语句是否小结:作业学习指导:13-15页活页卷66页例6编写程序,输入一元二次方程自然语言描述:每一步:输入a,b,c第二步:计算判别式
3、△第三步:如果△<0有两不同实根,△=0有两个相同实根,△<0否则没实数根。根据情况输出结果。开始输入a,b,cΔ=b2-4acp=-b/2aq=√Δ/(2a)x1=p+qx2=p-qΔ≥0?x1=x2?原方程有两个不等的实数根x1,x2原方程有两个相等的实数根x1,x2原方程无实数根结束是否是否的系数,输出它的实数根。程序框图:INPUT“a,b,c=“;a,b,cd=b*b-4*a*cIFd>=0THENp=-b/(2*a)q=SQR(d)/(2*a)IFd=0THENPRINT“x1=x2=”;pELSE
4、PRINTx1=p+q,x2=p-qENDIFELSEPRINT“Norealroot.”ENDIFEND原方程有两个相等的实数根p输入a,b,cΔ=b-4acΔ≥0p=-b/(2a)q=√Δ/(2a))Δ=0?x1=p+qx2=p-q原方程有两个不等的实数根x1、x2原方程无实数根结束是否是否例6编写程序,使得任意输入3个整数按大到小的顺序输出。算法分析:算法思想:3个数两两比较,确定大小。按a、b、c输入,要按a、b、c输出,关键要找到最大值,将它赋值给a,中值赋给b,最小值赋给c。第一步输入3个整数a、b
5、、c第二步将a与b比较,并把小者赋给b,大的赋给a;第三步将a与c比较,并把小者赋给c,大的赋给a第四步将b与c比较,并把小者赋给c,大的赋给b第五步按顺序输出a,b,c函数y=写出求函数的函数值的程序.解:INPUTxIFx>0THENy=1ELSEIFx=0THENy=0ELSEy=-1ENDIFENDIFPRINTyENDINPUT“a,b,c=”;a,b,cIFb>aTHENt=aa=bb=tENDIFIFc>aTHENt=aa=cc=tENDIFIFc>bTHENt=bb=cc=tENDIFPRINT
6、a,b,cEND相应的QBASIC程序:开始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?结束是是否否是否对应的流程图:函数y=写出求函数的函数值的程序.解:INPUTx=”;xIFx>=0andx<=4THENy=2*xELSEIFx<=8THENy=8ELSEy=2*(12-x)ENDIFENDIFPRINTyEND三、课后练习p.22练习第一题程序p.22练习第二题程序p.22练习第三题程序p.22练习第四题程序返回三、课后练习1:p
7、.16练习第一题程序程序:INPUT“a,b,c=“;a,b,cIFa+b>cANDa+c>bANDb+c>aTHENPRINT“YES“ELSEPRINT“NO”ENDIFEND返回三、课后练习4:INPUT“Pleaseinputayear:“;yb=yMOD4c=yMOD100d=yMOD400IFb=0ANDC<>0THENPRINT“闰年“ELSEIFd=0THENPRINT“闰年“ELSEPRINT”不是闰年“ENDIFENDIFEND返回三、课后练习3:p.22练习第三题程序程序:INPUT“Pl
8、easeinputaninteger:“;aIFaMOD2=0THENPRINT“偶数“ELSEPRINT”奇数“ENDIFEND练习1、铁路运输托运行李,从甲地到乙地,规定每张客票托运费计算方法是:行李质量不超过50kg时,按0.25/kg元计算;超过50kg而不超过100kg时,其超过部分按0.3元/kg计算,超过100kg时,其超过部分按0.45元/kg计算,编写程序,输入行李质