2025年VFP考试复习资料 .pdfVIP

其身正，不令而行；其身不正，虽令不从。——《论语》

VFP程序题目

有一个数列前两个数是1，1，第三个数是前两个数之和，以后每个数都是其前两个数之和，求第30个数(用

FOR语句编程)。

F1=1F2=1?F1?F2FORI=3TO30

F3=F1+F2?F3F1=F2F2=F3ENDFOR

1.求从开始连续N个不是7的倍数的自然数之和，当和是101的倍数时，显示最后的自然数和它们的和。

CLEARSTORE0TOX,SDOWHILE.T.

X=X+1IFMOD(X,7)0S=S+XELSE

IFMOD(S,101)=0EXITENDI

S=0ENDIENDDO?S,X-1

2.求s=1!+2!+3!+„+20!

CLEARS=0STORE1TOX,YDOWHILEX=20

S=S+YX=X+1Y=Y*XENDD?S

3.求3～1000间的所有素数，并输出和值。

S=0FORI=3TO1000FORK=2TOI-1

IFMOD（I，K）=0EXITENDIF

ENDFORIFK=I??STR(I,5)S=S+I

ENDIFENDFOR?S

4.编程实现以下功能，打开一学生数据表，显示前三条记录后暂停程序运行，按任意键后显示后三条记

录。

USE学生LISTNEXT3WAITGOBOTTOM

GORECNO()-2（或skip-2）LISTNEXT3USE

5.计算M=2×4×6ׄ„×2N，N由键盘输入，程序最后输出N、M的值。

INPUT“请输入N的值”TONM=1

FORX=2TO2*NSTEP2

M=M*XENDFOR?“N=”,N,”M=”,M

6.求3—100间的奇数之和，偶数之和，并统计奇数和偶数的个数。

STORE0TOS1,S2,Y1,Y2FORX=3TO100

IFMOD(X,2)=0S1=S1+XY1=Y1+1

ELSES2=S2+XY2=Y2+1ENDIFENDFOR

?“偶数之和及偶数的个数：”,S1,Y1

?“奇数之和及奇数的个数：”,S2,Y2

7.逆打印。

SETTALKOFFSTORE伟大祖国TOVA

天行健，君子以自强不息。地势坤，君子以厚德载物。——《周易》

CLEARN=7DOWHILEN0??SUBSTR(VA,N,2)

N=N-2ENDDO

VFP模拟题及答案

高校VFP模拟题及答案C.REPORTFORMPP1

一、选择题