VF顺序 和分支.pptVIP

Jmxy.zjgsu.edu.cn Company Logo 4.1.2选择结构 例7：编程计算行李托运费，如行李不超过20公斤，则每公斤运费为0.75元，如超过20公斤，则超过部分按1.5元计价。（分支例题3.PRG ） 分析：设行李重量为X公斤，运费为Y，其计算公式为： 4.1程序控制的基本结构 0.75*X X≤20 20*0.75+1.5*(X–20) X20 Y= Jmxy.zjgsu.edu.cn Company Logo 4.1程序控制的基本结构 Y N X=20? 开始 输入X Y= 0.75*X 结束 Y=0.75*20+1.5*(X-20) 显示X、Y 程序代码： SET TALK OFF INPUT 输入行李重量： TO X IF X=20 Y=0.75*X ELSE Y=0.75*20+1.5*(X-20) ENDIF ?X=,X ?Y=,Y SET TALK ON Jmxy.zjgsu.edu.cn Company Logo 4.1程序控制的基本结构 4.1.2选择结构 在VFP中有一个IIF函数与选择分支语句的作用相似。 该函数的格式为： IIF（条件表达式，表达式1，表达式2） 该函数的功能为：当条件表达式值为真时，执行表达式1，否则执行表达式2。流程框图如下： 条件表达式 真 假 值=表达式1 值=表达式2 Jmxy.zjgsu.edu.cn Company Logo 4.1程序控制的基本结构 4.1.2选择结构 IIF函数的求解过程： 1） 求解“条件表达式的值 2）如果“条件表达式的值为真 求解“表达式1”的值作为整个函数的值; 如果“条件表达式的值为假 求解“表达式2”的值作为整个函数的值。 以上题为例，用IIF函数编写程序如下： SET TALK OFF INPUT 输入行李重量 TO X Y=IIF(X=20,0.75*X,20*0.75+1.5*(X-20)) ?X=,X ?Y=,Y SET TALK ON Jmxy.zjgsu.edu.cn Company Logo 4.1 程序控制的基本结构 4.1.2选择结构 2．IF语句的嵌套，即在语句序列1或语句序列2中又可以包含IF语句。 一般格式： IF 条件表达式 　　语句序列1 ELSE 　IF-ELSE结构 ENDIF IF 条件表达式1 语句序列1 ELSE 　　 IF 条件表达式2 　　　　 语句序列2 　　 ELSE IF 条件表达式3 　　 语句序列3 ELSE 　　语句序列4 ENDIF 3 　　 ENDIF 2 ENDIF 1 Jmxy.zjgsu.edu.cn Company Logo 4.1 程序控制的基本结构 4.1.2选择结构 2．IF语句的嵌套 例8：求一元二次方程式ax2+bx+c=0的根，a、b、c的值从键盘输入。 分析： (1) b*b-4*a*c0 方程无实数根 (2) b*b-4*a*c=0 (A) b*b-4*a*c0 (B) b*b-4*a*c=0 有两个不相等的实数根 有两个相等的实数根 Jmxy.zjgsu.edu.cn Company Logo 4.1 程序控制的基本结构 D0 开始 结束 Y 输入A、B、C 输出“复根”信息 D=B*B-4*A*C P=B/(2*A) D=0 Y N N 输出相同根 输出不同根 计算这两个根 Jmxy.zjgsu.edu.cn Company Logo 4.1 程序控制的基本结构 程序代码： SET TALK OFF CLEAR INPUTa= TO a INPUTb= TO b INPUTc= TO c D=b*b-4*a*c P=-b/(2*a) IF D0 ? 复根 ELSE IF D=0 ?X1=X2=,P ELSE D1=SQRT(D) ?X1=,(-b+d1)/(2*a) ?X2=,(-b-d1)/(2*a) ENDIF ENDIF SET TALK OFF 例8：求一元二次方程式ax2+bx+c=0的根，a、b、c的值从键盘输入。 内层 外层 Jmxy.zjgsu.edu.cn Company Logo 4.1 程序控制的基本结构 例9：输入单价和数量计算金额，若购买数量≥100则9折优惠，若购买数量≥1000则8折优惠。 分析：设数量为X，单价为A，金额为Y，计算金额的方法如下： 流程图如下： A*X X1