vfp程序设计20100328.ppt

第九章 结构化程序设计 目 录 一般流程图，常用菱形框表示判断，用矩形表示进行某种处理，用流程线将各布操作连接起来。 N-S流程图，是有一些特定意义的图形，流程线及简要的文字说明构成，它能清晰明确地表示程序的运行过程。 3.单个字符接收命令 【例】从键盘输入两个任意正数，编程求以两数为边长的长方形面积。程序文件名为PROG4.PRG SET TALK OFF CLEAR INPUT “长方形一边的长为：” TO A INPUT “长方形另一边的长为：” TO B S=A*B ? “长方形的面积为：” , S SET TALK ON RETURN 从键盘输入两个任意正数，编程求以两数为边长的长方形面积。 SET TALK OFF CLEAR INPUT “长方形一边的长为：” TO A INPUT “长方形另一边的长为：” TO B S=A*B ? “长方形的面积为：” , S SET TALK ON RETURN 【练习】 1）、从键盘输入三角形的三条边A,B,C，求三角形的周长L和面积S； （提示：用海仑公式求S，使用函数SQRT（）） 2）、从键盘输入圆的半径R，求圆的周长L和面积S； （提示：使用函数PI()）（要求采用格式输出） 编程作业题2 1、 从键盘输入两个数,求出最大数和最小数。 扩展练习： 1）、从键盘输入三个数,求出最大数和最小数； （提示：设三个数为A、B、C，则可用下列语句求出最大数 MAX=IIF(A=B,A,B) MAX=IIF(MAX=C,MAX,C)同理可求出最小数） 2）、从键盘输入四个数,求出最大数和最小数； 试对(1)、(2)采用MAX（）和MIN（）函数实现 3、从键盘将两个学生的姓名(要求长度不同且不同姓)分别输给变量xm1和xm2，按要求编程： 求出xm1和xm2的长度； 将xm1和xm2按字符从小到大的顺序输出 4、输入某学生的学号，姓名，性别，年龄（分别用XH,XM,XB,NL表示），并在适当位置显示。 5.从键盘输入张三、李四两个人的出生日期（分别用D1、D2表示，为日期型数据），求出二人的年龄. 【练习】 (1)张三、李四的生日分别是几月份？ (2)张三、李四的生日相差多少天？ (3)张三、李四的出生日期相差多少天？ (4) 把D1、D2转换成字符串。 (提示:所用函数有DATE(),YEAR(),MONTH(),DAY(),DTOC(),MAX(),MIN()等） clear Input 请输入张三的出生日期： to d1 Input 请输入李四的出生日期： to d2 y1=year(date())-year(d1) y2=year(date())-year(d2) ?张三的年龄：,y1 ?李四的年龄：,y2 ?张三出生的月份：,month(d1) ?李四出生的月份：,month(d2) S1=month(d1)*30+day(d1) S2=month(d2)*30+day(d2) ?张三、李四的生日相差的天数：,s1-s2 ?张三、李四的出生日期相差的天数：,d1-d2 ?dtoc(d1),dtoc(d2) 6、请输出下图所示的图形。 【练习】 仿照示例分别输出下列三个图形: @5,10 say # @6,9 say ### @7,8 say ##### @8,7 say ####### @9,8 say ##### @10,9 say ### @11,10 say # 注意： 1、IF、ELSE、ENDIF必须各占一行，每一个IF都必须有一个ENDIF与其对应。 建议：书写IF、ELSE、ENDIF时，首字符 对齐，便于阅读。 2、条件表达式可以为关系表达式、逻辑表达式或其他逻辑量。 编程实例1 编程实现：任意输入两个数存入变量X、Y，若X大于Y，将X、Y两数交换，最后将X、Y输出。 INPUT “X=” TO X INPUT “Y=” TO Y IF XY T=X X=Y Y=T ENDIF ?X,Y * 例2：求邮件的费用 f * f = w*0.05 (w=100) * f = 100*0.05+(w-100)*0.02 （W为邮件的重量，从键盘接收数据） INPUT 请输入邮件重量: to w IF w=100 f = w*0.05 ELSE f=100*0.05+(w-100)*0.02 ENDIF ? 邮费为:, f 编程练习题 1、 编写一密码校验程序（假设密码为555）。当输入密码为“555”时，显示“密码正