vfp程序设计题汇总

vfp程序设计题汇总

ID:5988119

大小:1.73 MB

页数:10页

时间:2017-12-30

vfp程序设计题汇总_第1页
vfp程序设计题汇总_第2页
vfp程序设计题汇总_第3页
vfp程序设计题汇总_第4页
vfp程序设计题汇总_第5页
资源描述:

《vfp程序设计题汇总》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、一.程序设计题汇总1.通过输入学生的学号(字符型)查找学生,若找到该学生,先输出学号与姓名,然后输出“英语”和“计算机实用技术”成绩。若找不到该学生输出“查无该生”。(设表文件“学生信息”满足题目需要)settalkoffclearuse学生信息accept"请输入学生学号:"toxhlocatefor学号==xhif!eof()?学号,姓名listfiel英语,计算机实用技术for学号=xhelse?"查无该生"endifuse2.输入学生成绩,并要求:成绩小于60分时,输出“不及格”;成绩在60~69分之间时,输出“及格”;成绩在70~79之间时,输出“中”;

2、当成绩在80~89之间时,输出“良”;当成绩在90~100之间时,输出“优”。settalkoffclearinput"请输入成绩:"tocjdocasecasecj>=90?"优秀"casecj>=80?"良好"casecj>=70?"中"casecj>=60?"及格"casecj<60?"不及格"otherwise?"数据有误"endcasesettalkon1.按学号在“学生信息.dbf”文件中查找并显示指定的记录。要求可以重复查询,找到则显示该生的记录,找不到则提示“查无此人!”,按非“Y”、“y”可结束查询。SETTALKOFFCLEARUSE学生信息&

3、&设当前目录下表文件存在ACCEPT'学号查询吗(Y/N)?'TOcx&&循环条件的初始化DOWHILEcx='Y'.OR.cx='y'&&大小写均可执行查询CLEARACCEPT'请输入学号:'TOxhLOCATEALLFOR学号=xh&&此处ALL可以缺省,默认为在全部记录查找。IFEOF()?'查无此人!'WAITELSEDISPLAYENDIFACCEPT'继续按学号查询吗(Y/N)?'TOcx&&修改循环条件ENDDOSETTALKONUSE2.逐条显示“学生信息.dbf”文件中“英语成绩”大于等于75的记录。方法一:SETTALKOFFCLEARUSE

4、学生信息DOWHILE!EOF()IF英语成绩>=75DISPENDIFSKIP&&按默认值1向下移动记录指针ENDDOUSESETTALKON方法二:SETTALKOFFCLEARUSE学生信息locatefor英语成绩>=75DOWHILE!EOF()displaycontinueENDDOUSESETTALKON1.分别用DO循环和FOR循环求1+2+3+……+36的和值。用DO循环的写法:SETTALKOFFCLEARS=0N=1DOWHILEN<=36S=S+NN=N+1ENDDO?"1+2+3+……+36的值为:",SSETTALKON用FOR循环的写

5、法:SETTALKOFFCLEARS=0FORN=1TO36S=S+NENDFOR?"1+2+3+……+36的和值:",SSETTALKON1.用“SCAN…ENDSCAN循环结构”显示“学生信息.dbf”文件中“英语成绩”大于等于75的记录。SETTALKOFFCLEARUSE学生信息SCANFOR英语成绩>=75DISPLAYENDSCANUSESETTALKON2.求当1!+3!+5!+…+n!的值不超过10的20次幂时的临界值及n的值。SETTALKOFFCLEARS=1&&初始化存放累加和的变量S为1STORE1TOT,N&&初始化变量T,N的值为1DO

6、WHILES<=1E+20T=T*(N+1)*(N+2)&&从第二项开始,计算每一项阶乘。S=S+T&&追加每一项阶乘N=N+2&&下一个奇数ENDDO?"S=",S-T&&最后一个S由于是多加了一个T后不满足条件,故减去。?"N=",N-2&&最后一个N由于是多加了一个2后不满足条件,故减去。SETTALKON3.在程序所在的目录中已有学生表(学生.Dbf)(字段为:学号,姓名,性别,出生年月,简历,奖学金,照片)。要求:显示输出“学生”表中的1975年或以前出生的学生姓名和出生年月。SETTALKOFFCLEARUSE学生LOCATEFOR出生年月<={^19

7、75-12-31}&&定位满足出生年月的记录DOWHILE!EOF()&&如果没有到表尾,显示姓名与出生年月?姓名,出生年月CONTINUE&&继续指向满足条件的下一条记录ENDDOUSESETTALKON1.显示输出正整数M(从键盘输入)内的偶数及偶数和。SETTALKOFFCLEARINPUT"输入一个整数:"TOM&&输入指定的正整数M的值S=0&&初始化存放累加和变量S为0FORP=1TOMIFINT(P/2)=P/2&&判断P是否是偶数?PS=S+P&&是偶数就把它累加起来ENDIFENDFOR?SSETTALKON2.求解百鸡问题,“鸡翁一,值钱五;鸡

8、母一,值钱

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。