VFP上机答案(修改)

《VFP上机答案(修改)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、1.在学生表中查找并输出指定学生的所有信息INDEXON学号TOIXH!FOUND()DISPLAY2.判断给定的正整数表达式的值是否为素数,并能反复判断.FORI=2TOX-1I>=X-1IFUPPER(YN)=”Y”或者IFLOWER(YN)=”y”3.输入边长,如果能构成三角形,则计算三角形面积.DOWHILE.T.LOOPM=SQRT(U*(U-X)*(U-Y)*(U-Z))4.在屏幕上显示输出一个九九乘法表.X=1??STR(X,1)+”*”+STR(Y,1)+”=”+STR(X*Y,2)+””?5.根据输入的数据,计算不大于该

2、数的所有奇数累加和.UPPER(YN)=”Y”INT(X/2)<>X/2WAIT或者ACCEPT或者INPUT6.根据输入的数据,判断该数是否为偶数,可以反复判断.DOWHILEUPPER(YN)=”Y”N%2!=0或者N/2!=INT(N/2)或者MOD(N,2)!=0WAIT7.显示指定表中的全部字段名,并由用户输入显示表信息的条件,最后列表显示满足条件的记录.USE(TBN)或者USE&TBNFCOUNT()For&EXPR8.接收从键盘输入的任意5个数,输入的数字可以是负数,但最多包括3位符号位.程序的功能是,,找出其中最大的数和

3、最小的数,最后显示出来.ZX=XDOWHILEN>1ZX>X9.显示输出学生表中每个班级男女生的奖学金总金额.DOWHILE!EOF()LEFT(学号,3)=CLASS或者SUBSTR(学号,1,3)=CLASSSKIP10.返回给定字符串表达式的倒置字符串.例如,输入字符串”ABCD”,倒置后输出的字符串为”DCBA”.C=””或者C=SPACE(0)DoWhile0

4、整数M,判断并显示1~M中有哪些数可以分为两个相等的素数.(例如,M=10，有2个数符合,即3+3=6和5+5=10。)ELSEJ=2TOI-1IFJ>I-1或者IFJ=I14本程序显示学生表中获得奖学金的学生姓名和奖学金数额DOWHILE!EOF()或DOWHILE.NOT.EOF()奖学金>0SKIP15本程序显示学生表中1990年或者以前出生的学生姓名和出生年月（日期型）FORYEAR(出生年月)<=1990或者FOR出生年月<={^1990-01-01}DOWHILE.NOT.EOF()或者DOWHILE!EOF()或者DOWHI

5、LEFOUND()CONTINUE16本程序计算一个十进制正整数N的各位数字之和（如输入12378，则计算1+2+3+7+8）。ELSEWHILEM>0M=INT(M/10)17本程序实现从键盘中输入5个数，去掉一个最大数和一个最小数，然后求平均值StoreNtoA,B,SA

6、盘输入）的奖学金加60，并显示该学生的记录LOCATEFOR学号=MREPLACE奖学金WITH奖学金+60ENDIF21下面程序统计指定学生的平均成绩及该成绩的档次LOCATEFOR学号=XHAVERAGE成绩TOPJCJFOR学号=XHOTHERWISE22程序输出的结果如图所示H=5SPACE(H-K)2*K-124本程序实现“百钱买百鸡”的计算Y=0TO335*X+3*Y+Z/3=100ENDFOR25输入一个自然数，判断该数是否为完数S=0或者STORE0TOSMOD(M,N)=0或者INT(M/N)=M/N或者M%N=0S=M

7、程序改错题1．求当1！+3！+5！+¼+N！的值不超过1020时的临界值及N的值。DOWHILES<=1E+20T=T*IN=N+22．求X^1+X^2+X^3+X^4+……+X^N的值。N，X从键盘输入。S=0T=T*XENDDO3．用带参调用实现：M！／(M-N)！*N！DOJCWITHMJMNJ=M-NX=T4．输出3～M（M为正整数，从键盘输入）之间的素数和素数的个数。IFMOD(X,N)=0IFN=XK=K+15．统计显示“课程”表中所有不同学期考试课和考查课的总学分数。输出格式如下：DOWHILEXQ=学期KS=KS+学分SK

8、IP6．程序是显示输出给定行数的对称菱形图案，如下图所示。?SPACE(N-I)FORJ=1TO2*I-1FORK=1TO2*P-17．本程序显示下列的九九乘法表??STR(I,4)FORJ=