VF程序设计编程题答案.doc

第六章 程序设计编程题(3)下面程序的运行结果是()2008年4月选择题14SETEXACTONS=ni+SPACE(2)IFs=niIFs=ni?oneELSE?twoENDIFELSEIFs=ni?threeELSE?fourENDIFENDIFRETURNA)oneB)twoC)threeD)four1. 求园的面积（要求判断半径是否合理）CleaInpu r= to rIf r0 S=3.14*r*r ?sElse ?半径错误！Endif2. 求分段函数Y的值Y=2x5 x0x x=0| x | x0 Y=2*x+5Else If x=0Y=x ElseY=abs(x) EndifEndif?y3. 输入一个百分制成绩判断其等级（优/良/中/及格/不及格）CleaInpu cj= to cjDo case Case cj=90?优 Case cj=80?良 Case cj=70?中 Case cj=60?及格 Orth?不及格Endcase4. 输入若干个（个数不定）百分制成绩判断其等级（优/良/中/及格/不及格）CleaInpu 请输入处理几个人的成绩： to nFor i=1 to nInpu cj= to cjDo case Case cj=90?优 Case cj=80?良 Case cj=70?中 Case cj=60?及格 Orth?不及格Endcaseendfor5. 求S1+2+3. . . . . .+100CleaS=0For i=1 to 100 S=s+iEndfor?s 6. 求S123. . . . . .100Cleap=1For i=1 to 100 p=p*iEndfor?p7. 求S1+3+5. . . . .+99CleaS=0For i=1 to 99 step 2 S=s+iEndfor?s8. 求S12+34. . . . . .100CleaS=0For i=1 to 100 S=s+(-1)(i+1)*iEndfor?s9. 求S1+1/2+2/3+3/5. . . . . .前10项之和CleaS=0A=1B=1For i=1 to 10 S=s+a/b T=a A=b B=t+bEndfor?s10. 求S1！+2！+3！. . . . . .+10！CleaS=0P=1For i=1 to 10P=p*i S=s+p Endfor?s11. 对学生表中所有入学成绩650分的学生免去贷款CleaUse 学生Scan for入学成绩=650 .and. 贷款否=.t. Repl贷款否 with .f.EndscanUse* * * * * * * * * * * * * * * * * * * * *12. 输出图形CleaFor i=1 to 4 For j=1 to i?* Endfor ?EndforCleaFor i=1 to 4 For j=1 to 4-i? &有一个空格 Endfor For j=1 to 2*i-1?* Endfor ?EndforCleaFor i=1 to 4 For j=1 to 4-i? &有一个空格 Endfor For j=1 to i?* Endfor ?Endfor13. 判断一个整数是否素数CleaInpu x= to xFor i=2 to x-1 If mod(x,i)0Loop ElseExitEndifEndforIf ix-1 ?x,是素数Else ?x,不是素数Endif14. 判断十个整数是否素数CleaFor j=1 to 10Inpu x= to xFor i=2 to x-1 If mod(x,i)0Loop ElseExitEndifEndforIf ix-1 ?x,是素数Else ?x,不是素数EndifEndfor15. 找出两个数的大数和小数CleaInpu x= to xInpu y to yIf xy ?x,大,y,小Else ?y,大,x,小Endif16. 找出三个数的最大数和最小数CleaInpu x= to xInpu y to yInpu z to zIf xy t=xx=yy=tElse If xz t=xx=zz=t endifendifif yz t=yy=zz=tendif?x,是最大数,z,是最小数17. 找出十个数的最大数和最小数CleaDime a(10)For i=1 to 10 Inpu to a(i)EndforMax=a(1)Min=a(1)For i=2 to 10 If maxa(i) Min=a(i)Endif EndifEndfor?max,min18. 找出23矩阵中的最大数和最小数cleadime a(2,3)for i=1 to 2 for j=1 to 3input a(+str(I,2)+,+str(j,2)+)= to a(I,j) endforendformax=a(1,1)min=a(1,1)for i=1 to 2 for j=1 to 3if max a(I,j) min= a(I,j) endifendif endforendfor?max=,max,min=,min19. 对三个整数从大到小排序ClearInput a= to aInput b= to bInput c= to cIf ab T=a A=b B=tElse If ac t=a A=cc=t endifendifIf bc T=b A=c c=tendif?a,b,c20. 对十个整数从大到小排序（用选择法和起泡法两种方法）选择法:ClearDime a(10)For i=1 to 10 Input to a(i)EndforFor i=1 to 9 Max=a(i) Num=i For j=i+1 to 10If maxa(j) max=a(j) Num=jEndif Endfor If inum t=A(i) a(i)=a(num) a(num)=t EndifEndforFor i=1 to 10 ?a(i), Endfor起泡法：ClearDime a(10)For i=1 to 10 Input to a(i)EndforFor i=1 to 9 For j=1 to 10-i If a(j)c and a+cb and b+ca p=(a+b+c)/2 s=sqrt(p*(p-a)*(p-b)*(p-c) ?selse ?三边不能组成三角形Endif27. 求二元方程的根（分三种情况：两个不等实根，两个相等实根，无实根）cleainpu a= to a &a0inpu b= to b &b0inpu c= to ci=b*b-4*a*c if i0 ?方程无实根! else if i=0 r=(-b)/(2*a) ?方程有两个相等实数根:,r else x1=(-b+sqrt(i)/(2*a) x2=(-b-sqrt(i)/(2*a) ?方程有两个不相等实数根:,x1,x2 endifendif28. 输入任意一个五位整数，前后对应位置上的数据进行交换重新排列（即逆序排列）（例：2598448952）cleadime a(5)inpu to ba(1)=int(b/10000)a(2)=mod(int(b/1000),10)a(3)=mod(int(b/100),10)a(4)=mod(int(b/10),10)a(5)=mod(b,10)for i=1 to int(5/2) t=a(i) a(i)=a(6-i) a(6-i)=tendforc=a(1)*10000+a(2)*1000+a(3)*100+a(4)*10+a(5)?b,c29. 找出一个3x3矩阵的“鞍点”，即该位置上的元素在该行上最大，在该列上最小（也有可能没有鞍点）cleadime a(3,3) flag=.t.for i=1 to 3 for j=1 to 3 input a(+str(I,2)+,+str(j,2)+)= to a(i,j) endforendfor for i=1 to 3 max=a(i,1) col=1 for j=2 to 3 if maxa(k,col) min=a(k,col) row=k endif endfor if max=min ?a(row,col),是鞍点，在,row,行,col,列 flag=.f. endifendforif flag=.t. ?无鞍点endif30. 求S(n)=a+aa+aaa+.+aaa.aaa(其中有n个a)之值，a是一个数字，n和a由键盘键入(例如：2+22+222+22222+22222，此时n=5)cleainpu a= to ainpu n= to ns=0t=afor i=1 to n s=s+t t=a+t*10endfor?s1、 属性表示对象的状态；方法描述对象行为的过程.2、 域是指属性的取值范围.3、 从两个关系中找出满足符合条件的元组或属性组成一个新的关系的操作称为联接.4、 事件可以由系统引发，也可以由用户引发.5、 关系模型是指用二维表的形式表示实体和实体间联系的数据模型.6、 建立完整性的前提是先建立表之间的联系.7、 关系数据库中每个关系的表示形式是二维表.8、 用二维表数据来表示实体及实体之间联系的数据模型称为关系模型.9、 任何一个数据库管理系统都是基于某种数据模型建立的。数据库管理系统支持的数据模型分为3种：关系模型、层次模型、网状模型.10、 Visual Foxpro的程序设计方式有面向过程，面向对象两种.11、 关系数据库的3种关系运算是选择，投影，联接.12、 若关系中的某一属性组的值能惟一地标识一个元组，则称该属性组为关键字.13、 项目管理器用于将一个应用程序文件的所有文件集合成一个有机的整体，形成一个扩展名为.pjx的项目文件.14、 字符型常量也叫字符串，由可打印的字符或汉字构成。字符型常量必须用定界符括起来，定界符有3种，分别为单引号（），双引号（”）,方括号（【】）.15、 LEN（）函数的返回值为数值型数据.16、 函数的一般形式为函数名（【参数1】【参数2】）17、 在Visual Foxpro中，清除指定的内存变量的格式为RELEASE.18、 DATETIME（）返回值的数据类型是日期时间型.19、 执行？DAY（2003-10-15）命令后的显示结果是15.20、 执行？LEFT(“HAPPY NEW YEAR”,8)命令后的显示结果是HAPPY NE.21、 执行？UPPER(“Sunday星期日“)命令后的显示结果是SUNDAY星期日.22、 Visual Foxpro中的SKIP命令可使记录指针相对移动.23、 在Visual Foxpro中，要使所有职称为“工程师“的记录的工资增加50，应使用的命令是REPLACE ALL 工资WITH工资+50FOR职称=”工程师“.24、 在Visual Foxpro中，“表”文件的扩展名是.dbf.25、 在Visual Foxpro中，建立永久性关联的前提是必须先对需要关联的各个表建立索引.26、 数据库表之间的关系有一对一、一对多和多对多.27、 自由表可以建立的索引有候选索引，惟一索引，普通索引.28、 一个数据表是由表结构和记录组成的.29、 在定义表结构时，要分别定义表中每一个字段的字段名，类型和宽度.30、 在数据库中对两表建立关系时，要求父表的索引类型必须是主索引或候选索引，而子表的索引类型则可以是普通索引.31、 物理删除数据表中的部分记录前，应先对记录进行逻辑删除.32、 按照文件主名不同，复合索引文件可以分为结构复合索引和非结构复合索引.33、 在Visual Foxpro中，显示记录的命令是LIST和DISPLAY。他们的区别在于不使用条件时，LIST默认显示全部记录.34、 Visual Foxpro索引是由指针构成的文件，这些指针逻辑上按索引关键字值进行排序.35、 Visual Foxpro支持两类索引文件，分别为单索引文件和复合索引文件。其中复合索引又分为结构索引和非结构索引.36、 可以长期保存在计算机内的、有组织的、可共享的数据集合称为数据库.37、 当删除父表中的记录时，若子表中的所有相关记录也能自动删除，则相应的参照完整性的删除规则为级联.38、 Visual Foxpro在SQL方面支持数据定义、数据查询、数据修改等功能.39、 在SQL中，插入记录的命令是INSERT，修改记录的命令是UPDATE.40、 SQL的查询命令也称为SELECT命令.41、 在SQL中，查询空值时要使用IS NULL.42、 SQL的操作功能是指对数据库中数据的操作功能，主要包括数据的插入和更新，删除3方面的内容.43、 在SQL中，RIGHT JOIN称为右联接，它是指除满足联接条件的记录出现在查询结果外，第二个表中不满足联接条件的记录也出现在查询结果中.44、 在SQL语句中，AVG（）函数用来计算平均值.45、 在SQL语句中，字符串匹配运算符用LIKE表示；*表示0个或多个字符；？表示一个字符.46、 在ALTER TABLE中，ADD用来添加新字段；ALTER用来修改已有字段。47、 在SQL-SELECT语句中，定义一个区间范围的特殊运算符是BETWEEN,检查一个属性值是否属于一组值中的特殊运算符是IN.48、 在VISUAL FOXPRO计算机检索的函数中，count用于计数，sum用于求和，avg用于求平均值。49、 SQL语句中BETWEEN A AND B表示的意义是在A和B之间且包含A和B.50、 查询设计器中的排序依据选项卡对应于SQL语句中的ORDER BY.51、 在Visual Foxpro中，视图具有表和查询功能.52、 在Visual Foxpro中，查询是从指定的表或视图查找满足条件的记录.53、 在Visual Foxpro中，联接类型有内部联接、左联接、右联接,完全联接.54、 使用视图的更新功能可以修改表中的数据.55、 在关系数据库中，视图依赖于表，但是不独立存在.56、 在Visual Foxpro中，视图可以分为本地视图和远程视图.57、 创建视图时，相应的数据库必须处于打开状态.58、 执行FORENDFOR语句时，若步长为正值，则循环条件为=。若步长为负值，则循环条件为.59、 在简单的输入输出命令中，只能接受字符的命令是ACCEPT.60、 对于FORENDFOR语句，短语STEP中的默认值为1.61、 在Visual Foxpro中，程序是为了完成某一具有任务而编写的一系列的命令和语句.62、 程序结构是指在程序中命令或语句执行的流程结构。在Visual Foxpro中包括3中基本结构：顺序结构、选择结构、循环结构.63、 表单也称为屏幕或窗口.64、 Visual Foxpro中的类可以分为控件类和容器类.65、 对象具有属性、事件和方法.66、 控件的标题属性名为CAPTION.67、 属性窗口中的CAPTION属性可以设置表单的标题.68、 在Visual Foxpro中，表单是一个容器，它可以容纳Visual Foxpro的对象.69、 表单中的数据环境是一个容器，用于设置表单中使用的表、视图和表间的关系.70、 可以将生成的快捷菜单附加到控件中，常用的方法是在控件的RIGHT CLICK事件代码中加入命令DO快捷菜单文件名.mpr.71、 快捷菜单实质上是一个弹出式菜单，要将某个弹出式菜单作为一个对象的快捷菜单，通常是在对象的RIGHTCLICK事件代码中添加调用该弹出式菜单程序的命令.72、 在Visual Foxpro中，使用“菜单设计器”定义菜单，最后生成的菜单程序的扩展名是.mpr.73、 报表的数据源可以是表、查询、视图.74、 在“报表设计器”中使用的控件是标签、域控件、线条.75、 下列选项中，不属于报表控件的是文本框.76、 报表的数据源可以是数据库表、视图、查询和临时表.77、 报表的设计包括报表的数据源和报表的布局.78、 使用“项目管理器”的文档选项卡管理报表.79、 为了在报表中加入一个文字说明，应该插入一个标签控件.80、 在Visual Foxpro中，方法是描述对象行为的过程，属性用来表示对象的状态.81、 类是对象的实例，而对象是类的集合 错误.82、 表单是容器类控件.83、 在向表单中添加控件时，要保存不希望用户改动的文本，应创建标签控件.84、 在表单控件中，既可接收输入数据，又可在其中编辑现有数据的控件是文本框.85、 在表单控件工具栏中，要保存多行文本，可以创建编辑框控件。86、 要运行一个设计好的表单，可以在命令窗口使用DO FORM命令。8