【课题】案例5.3编写显示指定学生档案数据的程序
本课（章、节）共 课时，本课时为第 课时，课的类型：新授课
【教学目标】掌握单分支选择结构程序的流程，理解单双分支选择结构程序，会读单双分支选择结构的简单程序，学习选择结构程序的编写
【教学重点】掌握单分支选择结构程序的流程，理解单双分支选择结构程序，会读单双分支选择结构的简单程序
【教学难点】会读单分支选择结构的简单程序，并会编写分支结构程序 【教学方法】讲授法、实验法等 【按课时数】2课时 【教学过程及板书设计】 复习提问：
1、 INPUT、ACCEPT、WAIT三者的区别是什么？ 新授：
一、单分支选择结构
命令格式： IF 〈逻辑表达式〉 〈命令语句1〉 ?? 分支体 ENDIF
功 能：若逻辑表达式值为“.T.”，执行命令语句分支体序列；否则，程序继续运
11
行 ENDIF 以后的语句。其流程图如下：
例1从键盘上输入一个数，如果能被3整除，则显示信息。 ? INPUT \请输入待判断的数：\ TO X ? IF X/3=INT(X/3)
? ? X,\可以被3整除！\? ENDIF ? RETURN
二、双分支的结构和流程图如下：
如果<条件>表达式的值是真（.T.）则执行<语句序列1>，然后执行ENDIF后的语句；否则执行<语句序列2>，然后执行ENDIF后的语句。
IF 和 ENDIF必须成对出现，分别是入口和出口；条件语句可以嵌套但不能交叉。书写时最好按缩进格式。
12
例2 CLEAR
INPUT “请输入待判断的数：” TO X IF X/3=INT(X/3) ? X,”能被3整除！” ELSE
? X,”不能被3整除！” ENDIF RETURN
例3编写程序D:\\XS\\DISPDA2,该程序用于在XSDA中查找用户指定的学号。如果查找成功，显示该 记录，否则显示一条说明信息。 分析：先打开表 再输入学号
在当前表中查找该学号
根据查找的结果选择显示不同的信息。 CLEAR USE XSDA
ACCEPT”请输入查询的学号” TO XH LOCATE FOR 学号==XH IF FOUND()
13
DISPLAY ELSE
WAIT”不存在该学号的学生” ENDIF USE RETURN （第二课时） 三、课堂练习
1、编写一程序年满18岁的显示“已成年”否则显示“未成年” clear
input \输入您的年龄\if age>=18 ?\已成年\else ?\未成年\endif 2、如右图
Input “a=“to a If a=10 s=0 Endif S=1 ?s 当A的值为11时S为（ ）
14
四、例题讲解 例3计算运费：
货物重量不超过50公斤时,每公斤0.50元,重量超过50公斤时超过部分每公斤加收0.40元,编制计算运费的程序.
分析：要给学生灌输数学思想，让学生先把算法整理出来，然后开始编程 解法1
INPU\重量=\Y=0.5*X IF X>50
Y=Y+0.4*(X-50) ENDIF ?\运费=\解法2
INPU\重量=\IF X>50
Y=25+0.9*(X-50) ELSE Y=0.5*X ENDIF ?\运费=\
15
VFP第五章电子教案
