1、下列程序片段的执行结果是 FOR I=1 TO 10 S=S+ ENDFOR 2、下列程序片段实现了将 STUD. DBF中所有男生的数据记录的输出,请在画线处填上正确的语 USE STUD DO WHILE NOT. EOFO IF性别=” DISPLAY wAIT”按任意键继续显示下一条记录! ENDIF ENDDO USE 3、下列程序片段完成了程序运行时,根据所输入的姓名从XSDA表(包含姓名字段)中查找记 录的操作,若查找到则显示其学号、姓名、专业信息,若无则显示“查无此人!”。要求在画 线处填上适当的程序代码 USE XSDA. DBF ACCEPT“请输入待查学生姓名:” TO NAME LOCATE ?”学号:”+学号+”姓名:”+姓名+”专业:”+专业
1、下列程序片段的执行结果是 。 S=0 FOR I=1 TO 10 S=S+I ENDFOR ？ S 2、下列程序片段实现了将 STUD.DBF 中所有男生的数据记录的输出，请在画线处填上正确的语 句。 USE STUD DO WHILE .NOT.EOF() IF 性别=”男” DISPLAY WAIT ”按任意键继续显示下一条记录！” ENDIF ENDDO USE 3、下列程序片段完成了程序运行时，根据所输入的姓名从 XSDA 表（包含姓名字段）中查找记 录的操作，若查找到则显示其学号、姓名、专业信息，若无则显示“查无此人！”。要求在画 线处填上适当的程序代码。 USE XSDA.DBF ACCEPT “请输入待查学生姓名：” TO NAME LOCATE IF ? ”学号：”+学号+”姓名：”+姓名+ ”专业：”+专业
ELSE ?”查无此人!” ENDIF USE 4、下列程序片段执行后,T的结果为 DO WHILE I<=5 T=T* I=+1 ENDDO 5、下列程序片段的功能是判断所输入的一个字符是属于字母、数字或特殊符号(字母、数字之 外的符号),请在画线处填上适当的程序代码。 ACCEPT“请输入一个字符:” To cVar DO CASE CASE UPPER(cVar=”Z” AND UPPER(cWar)>=”A” ?cVar,”是字母 CASE ?cVa,”是数字! ?cVar,”是特殊符号! ENDCASE 6、下列程序片段执行后,Y的结果为
ELSE ? ” 查无此人！” ENDIF USE 4、下列程序片段执行后，T 的结果为 。 T=1 I=1 DO WHILE I<=5 T=T*I I=I+1 ENDDO ?T 5、下列程序片段的功能是判断所输入的一个字符是属于字母、数字或特殊符号（字母、数字之 外的符号），请在画线处填上适当的程序代码。 ACCEPT “请输入一个字符：” TO cVar DO CASE CASE UPPER(cVar)<=”Z”.AND.UPPER(cVar)>=”A” ? cVar, ”是字母!” CASE ? cVar, ”是数字!” ? cVar, ”是特殊符号!” ENDCASE 6、下列程序片段执行后，Y 的结果为
DO WHILE X<10 Ⅹ=X+1 IFINT(/2)X/2 Y=Y+1 ENDIF ENDDO 7、下列的程序实现了一个圆环面积的计算并输出结果。其中,圆面积计算代码按自定义函数形 式组织,函数名为AREA,要求在画线处填上适当的程序代码 主程序三三三三三三三=三三=== NPUT“请输入大圆的半径:”ToR1 NPUT“请输入小圆的半径:"TOR2 S=AREA(R1)-AREA(R2) &调用函数AREA ?圆环的面积:"+ RETURN ==三====完成圆面积计算的自定义函数=三三三三= FUNCTION AREA(R) s=P()*R^2 ENDFUN 六、编程(共15分) 1、编写程序,统计1~-100之间所有能被7又能被3整除的整数的个数。(5分) 2、编写程序实现从键盘上输入正整数N,计算11+2!+…+N。要求N的阶乘计算代码按函数 的形式来组织,过程名为JC,请写出完整的程序代码。(5分) 3、若设计如下图所示的求解一元二次方程根的表单程序,其中方程的三个参数从表单的文本框 TextI、Text2、Text3)中输入,单击“求解”按钮求实数根,所求实数根显示在文本框(Text4 和Text5)中。(5分)
X=0 Y=0 DO WHILE X<10 X=X+1 IF INT(X/2)<>X/2 Y=Y+1 ENDIF ENDDO ?Y 7、下列的程序实现了一个圆环面积的计算并输出结果。其中，圆面积计算代码按自定义函数形 式组织，函数名为 AREA，要求在画线处填上适当的程序代码。 * ============= 主程序 ============= INPUT “请输入大圆的半径：” TO R1 INPUT “请输入小圆的半径：” TO R2 S=AREA(R1)-AREA(R2) &&调用函数 AREA ?”圆环的面积：”+ RETURN *=======完成圆面积计算的自定义函数======== FUNCTION AREA(R) S=PI( )*R^2 ENDFUN 六、编程（共 15 分） 1、编写程序，统计 1~100 之间所有能被 7 又能被 3 整除的整数的个数。（5 分） 2、编写程序实现从键盘上输入正整数 N，计算 1!+2!+……+N!。要求 N 的阶乘计算代码按函数 的形式来组织，过程名为 JC，请写出完整的程序代码。（5 分） 3、若设计如下图所示的求解一元二次方程根的表单程序，其中方程的三个参数从表单的文本框 (Text1、Text2、Text3)中输入，单击“求解”按钮求实数根，所求实数根显示在文本框（Text4 和 Text5）中。（5 分）
入代可次方程的数kx 要求(1)简单写出在Ⅴ isual Fox pro设计如下表单的基本过程(2)请写出“求解”和“退出” 按钮的Cick事件过程代码。 Visual foxpro程序设计》期末模拟试 卷-Ⅱ 、判断正误(对的打号,错的打X号,每题1分,共10分) ()1.数据管理技术的发展经历了人工管理阶段、文件系统阶段和数据库系统阶段 ()2.关系的三种基本运算中,投影是指从一个关系中选取若干个属性(列)的操作。 ()3.备注型字段系统默认的宽度为4,因此该字段只能存放占四个字节的数据信息。 ()4.无论执行何种操作, Visual Foxpro系统菜单栏总是一成不变的。 ()5.备注型字段系统默认的宽度为4,因此该字段只能存放占四个字节的数据信息。 ()6. Visua| FoxPro中的一个简单变量、常量或者函数也是表达式
要求（1）简单写出在 Visual FoxPro 设计如下表单的基本过程（2）请写出“求解”和“退出” 按钮的 Click 事件过程代码。 《Visual FoxPro 程序设计》期末模拟试 卷-Ⅱ 一、判断正误（对的打√号，错的打 X 号，每题 1 分，共 10 分） （ ）1. 数据管理技术的发展经历了人工管理阶段、文件系统阶段和数据库系统阶段。 （ ）2. 关系的三种基本运算中，投影是指从一个关系中选取若干个属性（列）的操作。 （ ）3. 备注型字段系统默认的宽度为 4，因此该字段只能存放占四个字节的数据信息。 （ ）4.无论执行何种操作，Visual FoxPro 系统菜单栏总是一成不变的。 （ ）5.备注型字段系统默认的宽度为 4，因此该字段只能存放占四个字节的数据信息。 （ ）6. Visual FoxPro 中的一个简单变量、常量或者函数也是表达式