vfp顺序结构与分支结构程序设计

《vfp顺序结构与分支结构程序设计》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、[课题]：顺序结构与分支结构程序设计[目的要求]：了解顺序结构、分支结构的概念，理解分支语句的格式、作用及流程，掌握顺序结构、分支结构的程序设计，领会分支结构在程序的作用。[重点]：分支语句的格式、作用与流程；分支结构程序的编写。[难点]：流程与程序的编写。[学时]：2学时[教学过程及内容]：导入：面向过程程序设计包括三种基本控制结构：顺序结构、分支结构、循环结构。今天我们来了解有关顺序结构、分支结构的有关内容一、顺序结构概念：程序的执行是按其语句排列的先后顺序进行执行的程序。例：CLEARSETTALKOFFUSERS

2、ACCEPT"请输入要修改记录的教师名："toxmLOCATEFOR姓名=xmREPL职称WITH"教授"USESETTALKONRETURN是按其语句的排列先后顺序执行的二、分支结构概念：选择分支结构是根据条件的测试结果执行不同的操作。VFP中有两条命令实现条件分支：二路选择分支结构（IF…ENDIF）和多路选择分支结构（DOCASE…ENDASE）。<一>IF…ENDIF结构1、结构：IF<条件表达式><语句系列1>[ELSE<语句系列2>]ENDIF2、功能：当<条件表达式>的值为真时，执行<语句系列1>；否则执行

3、<语句系列2>。如果没有ELSE的子句，则当<条件表达式>的值为假时，不进行任何操作。注：IF和ENDIF必须配对使用。3、流程（板书略）4、例：从键盘输入一个正整数，判断其是奇数，还是偶数SETTALKOFFclearINPUT"请输入一个正整数:"TOXIFINT(X/2)=X/2?X,"为偶数!"ELSE?X,"为奇数!"ENDIFSETTALKON5、练习：从键盘输入一个正整数，若该数能被3或7整除，则输出该数的平方6、IF嵌套解释：一个IF语句中包含另一个IF语名例：从键盘输入一个成绩，若在85~100之间,则

4、输出“优”，若在70~85之间，则为“良”，若在60~75，则为“及格”，在60以下，则为“不及格”，否则输出“非法成绩”SETTALKOFFCLEARINPUT“请输入你的成绩”TONIFN>100ORN<0?”非法成绩!”RETURNendifIFN>=85?”优”ELSEIFN>=70?”良“ELSEIFN>=60?”及格”else?”不及格”ENDIFENDIFENDIFSETTALKONRETURN7、练习：解分段函数x2+7x<0y=x+7x=0x2-7x>0<二>DOCASE…ENDASE结构1、结构：见教

5、材P42。DOCASECASE<条件表达式1><语句系列1>[CASE<条件表达式2><语句系列2>……CASE<条件表达式N><语句系列N>][OTHERWISE<语句系列N+1>]ENDCASE2、功能：依次判断<条件表达式>的值，当值为真时执行对应的<语句系列>，执行后转到ENDCASE的下一条语句；当所有<条件表达式>的值都为假时，则执行OTHERWISE下面的<语句系列1>。注：DOCASE和ENDCASE必须配对使用,case的条件表达式的值必须为逻辑值。3、流程：板书略4、例：同例对成绩作出评语SETTAL

6、KOFFCLEARINPUT“请输入你的成绩：”tonIfn>100orn<0?”非法成绩！”endifdocasecasen>=85?”优”casen>=70?”良”casen>=60?”及格”otherwise?”不及格”endcasesettalkonreturn[小结]1、IF…ENDIF、DOCASE…ENDASE的结构、功能2、流程[作业]1、从键盘输入一半径，然后求圆的周长、面积与球的体积2、解ax2+bx+c=0的根，a、b、c的值从键盘输入clear?"一元二次方程：a*x^2+b*x+c"input"

7、a="toainput"b="tobinput"c="tocd=b*b-4*a*cdocasecased<0?"无实根"cased=0?"x1=x2=",-b/(2*a)cased>0?"x1=",(b+sqrt(d))/(-2*a)?"x2=",(b-sqrt(d))/(-2*a)endcase3、现某商店按顾客购物的多少分别给予不同的优惠如下：250元以下的，没有折扣；250～500之间的，优惠5%；500～1000之间的，优惠7.5%；1000～2000之间的，优惠10%，2000及2000以上的，优惠15%。请从

8、键盘输入你的购物款，然后输出实际金额。