块结构IF语句课件

单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,块结构,IF,语句,三、说明,1,、,THEN,后面不能有除了注释语句以外的其他任何语句,2,、语句块可以包括,0,、,1,、或多个语句行,3,、,ELSE,部分可有可无,4,、建议语句块向内缩进若干列，,ELSE,独占一行,5,、,IFTHEN,与,EDN IF,必须成对使用,1,、,THEN,后面不能有除了注释语句以外的其他任何语句,2,、语句块可以包括,0,、,1,、或多个语句行,3,、,ELSE,部分可有可无,4,、建议语句块向内缩进若干列，,ELSE,独占一行,5,、,IFTHEN,与,EDN IF,必须成对使用,例,1,：,求解一元二次方程,开始,输入,a,，,b,c,d=b2-4*a*c,d=0,X1=(-b+sqr(d)/(2*a),输出,X1,X2,输出“,wu shi gen”,结束,j,是,否,X2=(-b-sqr(d)/(2*a),File Edit View Search Run Debug Options Help,Untitled,D:QBASICQBASIC.EXE,CLS,INPUT “SHU RU A,，,B,，,C”,；,A,，,B,，,C,D=B2-4*A*C,IF D=0 THEN,X1=(-B+SQR(D)/(2*A),X2=(-B-SQR(D)/(2*A),PRINT“X1=”,；,X1,；“,X2=”,；,X2,ELSE,PRINT“WU SHI GEN”,END IF,END,SHU RU A,，,B,，,C,？,X1=-2 X2=-3,1,，,5,6,，,Press any key to continue,例,2,：,由键盘输入,a,b,c,将,a,b,c,作为三角形三边的长，用下面的公式编程求三角形的面积。,其中：,P=,（,a+b+c)/2,开始,输入,a,b,c,a+bc,AND,a+cb,AND,b+ca,P=(a+b+c)/2,输出,S,输出“,wu shi gen”,结束,是,否,s=sqr(p*(p-a)*(p-b)*(p-c),File Edit View Search Run Debug Options Help,Untitled,D:QBASICQBASIC.EXE,CLS,INPUT “SHU RU A,，,B,，,C”,；,A,，,B,，,C,IF A+BC AND A+CB AND B+CA THEN,P=(A+B+C)/2,S=SQR(P*(P-A)*(P-B)*(P-C),PRINT“S=“,；,S,ELSE,PRINT“SHU RU CHUO WU”,END IF,END,SHU RU A,，,B,，,C,？,S=6,3,，,4,5,，,Press any key to continue,从键盘输入一个数，,判断能否被,3,或,5,整除,。如果能整除则输出这个数，否则显示“此数不能被整除”。,作业,1,：,从键盘输入一个数，编写可以判断这个数,是奇数还是偶数,的程序。,作业,2,：,