VF1-4章习题答案.doc

第一章参考答案二、判断题1、2、3、4、5、6、三、选择题1、C 2、C 3、B四、填空题1、数据库管理系统2、表文件，单项索引文件，程序文件，内存变量文件3、面向对象第二章参考答案一、判断题1.2.3.4.5.6.7.8.9.10.11.12.二、选择题1.A 2.A 3.B 4.D 5.C 6.C7.D8.A9.B10.C11.B，B 12. D13.D14.B15.A16.C三、填空题1. 函数，数值运算，关系运算，逻辑运算2. 数值型（N），数值型（N），字符型（C）3. .T.4. 算5. 1234.192，1000.00006. （1）LOG(X+Y)/LOG(10)+2*X（2）EXP(X+Y)+SIN(60*3.14/180)（3）X=20 .AND. X=807. 25，N8. 当前年份（如2002）第三章参考答案二、选择题1、B 2、B 3、D 4、C 5、B 6、B 7、B 8、B 9、A 10、C 11、B第四章参考答案一.判断题123456789101112二.单选题123456789DCDCCABBA三.程序控制结构根据题目要求，编写相应的程序。1.求出下列表达式的值（x.y的值从键盘输入）：程序代码：SET TALK OffCLEARINPUT X= TO XINPUT Y= TO YZ=(X*Y+EXP(X+Y)/(X/Y)3*LOG10(ABS(X-Y)?X=,X,Y=,Y,Z=,ZSET TALK ON2.给定一个年份（从键盘输入），判断它是否闰年。闰年的条件是：能被4整除但不能被100整除，或能被100整除且能被400整除。程序代码：SET TALK OffCLEARINPUT Year= TO Yearif (year%4=0 and year%1000) or (year%100=0 and year%400=0) ?year,是闰年else?year,不是闰年endifSET TALK ON3.从键盘输入数据A（可以是C.D.N.L.Y和U型等），通过类型判断，输出其数据类型的汉字说明（如A的值为“OK！”，那么输出应为：OK！字符型数据）。程序代码：SET TALK OffCLEARINPUT A= TO ado casecase type(a)=C?a,字符型数据case type(a)=D?a,日期型数据case type(a)=N?a,数值型数据case type(a)=L?a,逻辑型数据case type(a)=Y?a,货币型数据case type(a)=U?a,未定义endcaseSET TALK ON4.从键盘输入A.B.C三个数值，将它们从小到大排列后输出。程序代码：SET TALK OffCLEARINPUT A= TO AINPUT B= TO BINPUT C= TO Cif bad=aa=bb=dendifif cad=aa=cc=dendifif c+SUBSTR(C,2*N+1,2)SET TALK ON四.程序阅读题。阅读下列程序，写出运行结果。1.参考答案：A-一 B-三 C-五 D-七2.参考答案：ABCDEF-EFCDAB3.参考答案：3 5 7 8.参考答案：AABC ABCDEABCDEFG ABCDEABC A五.综合编程题。根据题目要求，编写相应的程序。1.求X+ X2 + X3 + X4 + Xn的值。N，X从键盘输入。程序代码：SET TALK OFFclearINPUT X= TO XINPUT N= TO NS=0I=1DO WHILE I=NS=S+XII=I+1ENDDO?X+X2+X3+.+XN=,SSET TALK ON2.求S=2/1+3/2+5/3+8/5+13/8+.前20项之和。程序代码：SET TALK OFFclearS=0N=1X=1Y=2DO WHILE N=20S=S+Y/XT=XX=YY=Y+TN=N+1ENDDO?2/1+3/2+5/3+.+17711/10946=,S &共有N=20项累加SET TALK ON3.从键盘输入一个正整数，判断其所含5的个数。（如：输入数值2345105，其中包含5的个数为2）程序代码：SET TALK OFFclearINPUT 请输入一个正整数X: TO XS=0DO WHILE .T.N=MOD(X,10) &第一次求X的个位数N,第二次求X的十位数N，IF N=5S=S+1ENDIFX=INT(X/10)IF X=0EXITENDIFENDDO?X中5的个数为:,SSET TALK ON8.利用参数传递和过程文件，求（M！+N！）/（M-N）！程序代码：SET TALK OFFCLEARSET PROC TO 程序20INPUT M= TO MINPUT N= TO NSTORE 0 TO SM,SNDO JC2 WITH M,SMDO JC2 WITH N,SNDO MC2 WITH M-N,N?表达式结果为S=+STR(SM+SN)/N,10,2)SET PROC TOSET TALK ONPROC JC2PA