《VFP程序设计》--选择结构

第九章程序设计基础——选择结构1、程序文件是一个文件，程序文件的默认扩展名是：.PRG。2、新建程序的方法。A、使用项目管理器B、使用菜单或工具按钮C、使用命令：MODIFYCOMMAND〈程序文件名〉3、运行程序的方法。A、使用项目管理器B、使用菜单C、使用命令：DO〈程序文件名〉4、修改程序文件的方法A、在项目管理器中选中该程序后单击“修改”B、使用命令：MODIFYCOMMAND程序文件名选择结构也叫条件结构，是指在算法中通过对条件的判断，根据条件是否成立而选择不同流向的算法结构．一、双分支选择结构语句格式如下：IF〈条件〉〈语句组1〉[ELSE〈语句组2〉]ENDIF参数说明：①IF是双分支选择结构开始的语句，ENDIF是双分支选择结构结束的语句，它们必须成对使用。②条件是一个逻辑表达式。③语句组由一组VFP的命令组成。④若ELSE省略，则为单分支选择结构。程序流程：程序执行到双分支选择结构时，首先检查IF后面的“条件”。如果满足条件（即该逻辑表达式的值为真），则执行“语句组1”，否则执行“语句组2”。“语句组1”或“语句组2”执行完后，再执行ENDIF后面的语句。判断框：判断某一条件是否成立，成立时在出口处标明“是”或“Y”；不成立时标明“否”或“N”．1、输入一个温度，若大于36度则显示高温，反之则显示不是高温。程序分析：①首先接收一个温度②判断该温度与标准温度36度的大小，若大了则显示高温，反之则显示不是高温。Settalkoffclearinput“请输入温度”toWDifWD36wait“该温度是高温。请按任意键继续……”elsewait“该温度不是高温。请按任意键继续……”endifSettalkonreturn语句格式如下：DOCASECASE条件1语句组1CASE条件2语句组2……CASE条件n语句组n[otherwise语句组n+1]ENDCASE二、多分支选择结构程序流程：当执行DOCASE语句时，顺序判断CASE后面的条件是否为真，只要遇到第一个条件为真的CASE时，就执行其后的语句序列，执行完毕后，跳转到ENDCASE后面的语句去执行。参数说明：①DOCASE是多分支选择结构开始的语句，ENDCASE是多分支选择结构结束的语句，它们必须成对使用，缺一不可。②当所有的CASE后面的条件都为假，则执行OTHERWISE后面的语句，如果没有OTHERWISE，则执行ENDCASE后面的语句。③当有多个CASE后面的条件都为真时，则只有第一个CASE后面的语句会被执行到，然后转去执行ENDCASE后面的语句。例1、通过键盘输入3个数，比较这3个数的大小，并按从大到小的顺序输出。程序分析：①通过键盘输入，确定要使用的输入语句。②如何比较大小，确定算法。③确定要使用的语句。程序如下：SETTALKOFFCLEARINPUT“请输入A=”TOAINPUT“请输入B=”TOBINPUT“请输入C=”TOCDOCASECASEA=B.AND.B=C?A,”=”,B,”=”,CCASEA=B.AND.B=C?A,”=“,B,”=”,CCASEA=C.AND.C=B?A,”=”,C,”=”,BCASEB=A.AND.A=C?B,”=”,A,”=”,CCASEB=C.AND.C=A?B,”=”,C,”=”,ACASEC=A.AND.A=B?C,”=“,A,”=”,BOTHERWISE?C,”=”,B,”=”,AENDCASERETURN1、求一元二次方程AX2＋BX＋C＝0的实根。输出x1,x2△＜0YN结束开始输入a,b,c△←b2－4ac输出“方程无实数解”abxabx2,221解：算法步骤如下：S1输入a，b，c；S2△←b2－4ac；S3若△＜0；则输出“方程无实数解”，否则输出x1，x2.abx21abx22Input“请输入二次系数”toaInput“请输入一次系数”tobInput“请输入常数”tocd＝B^2-4*A*CIFd=0X1=(-B+SQRT(d))/(2*A)X2=(-B-SQRT(d))/(2*A)?“实根为：”，X1,X2ELSE?”没有实根！”ENDIF1、双分支选择结构。IF……ELSE……ENDIF2、多分支选择结构。DOCASE…CAES…OTHERWISE…ENDCASE3、选择结构在实际项目中的应用。（三个实例）1、有以下函数，编一程序，输入X的值，输出Y的值。X(X1)Y=2X-1(1≤X＜10)3X+5(X≥10)