VFP编程题类型总结

编程题类型总结(VFP)

①求和类：

1. 计算S=1！+2！+3！+4！+。。。。。。+N! S=0 K=1

INPUT \FOR i=1 TO N K=K*i S=S+K Endfor ?S

2.求 1?3?5?7????????21 SUM=0

FOR I=1 TO 21 STEP 2 SUM=SUM+I^3 ENDFOR

?”SUM=”,SUM

3.有一分数序列，求前20项之和

33333求 N的阶乘。（N的值由键盘输入，应小于20 ） INPUT “输入N的值” TO N P=1 FOR I=1 TO N P=P*I ENDFOR ?N,“!=”,P 21?32?53?85?138......

M=1

N=2 SUM=0

FOR I=1 TO 20 TERM=N/M SUM=SUM+TERM X=N N=M+N M=X

TERM=N/M ENDFOR

?”SUM=”,SUM

4.求Sn=a+aa+aaa+aaaa??，其中，a是一个数字，a的个数为n，a和n由键盘输入 INPUT \输入 a 的值:\INPUT \输入项数n:\SN=0 B=A

FOR I=1 TO N SN=SN+A

A=A*10+B ENDFOR

?\数列之和为:\

5. 求e的台劳级数展开式的前n项之和(运行时输入x=2.0,n=4)

23n?1xxxex?1?x??????????2!3!(n?1)!

x

INPUT “X=” TO X

INPUT “N=” TO N SUM=1 P=1

FOR I=1 TO N-1 P=P*I T=X^I/P SUM=SUM+T ENDFOR

?”SUM=”,SUM

6.求1*2+3*4+5*6+??21*22 SUM=0

FOR I=1 TO 21 STEP 2 SUM=SUM+I*(I+1) ENDFOR

?\和为=\

7.通过键盘输入n，求下列级数的 和:

?1-1/2+1/3-1/4+?+1/n INPUT TO N S=0 F=1

FOR I=1 TO N

S=S+F*(-1)^(I-1)/I ENDFOR ?S

8.计算连续自然数之和，并且显示和刚大于1000的最后一个自然数

? Sn=1+2+3+4+?+N STORE 0 TO S,N

DO WHILE S<=1000

N=N+1 S=S+N

ENDDO ? N

9.求1^2+4^2+7^2+?一直加到超过1000为止，输出和数与项数。

I=1 S=0 N=0

DO WHILE S<=1000 S=S+I^2 I=I+3 N=N+1 ENDDO ?N ?S

10.求1-100之间所有奇数之和 SUM=0

FOR I=1 TO 100 STEP 2 SUM=SUM+I ENDFOR

? “SUM=”,SUM

10.输出100到200之间所有能被5或7整除的整数，并输出他们的和。

SUM=0

FOR I=100 TO 200

IF MOD(I,10)=5 AND MOD(I,7)=0 SUM=SUM+I ?I

ENDIF ENDFOR

?“SUM=”,SUM

11.编程输出100~500之间能被7整除的奇数的个数。 N=0

FOR I=100 TO 500

IF I%7=0 AND I%2=1 N=N+1 ENDIF ENDFOR ? “N=”,N

12. 求1/(1*2)+1/(3*4)+1/(5*6)+??+1/(99*100) SUM=0

FOR I=1 TO 99 STEP 2

SUM=SUM+1/(I*(I+1)) ENDFOR

?\13.

求如下级数前N项之和(X和N的值由键盘输入)

N=0 FOR I=101 TO 500 STEP 2 IF MOD(I,7)=0 N=N+1 ENDIF ENDFOR ? “N=”,N x2x3x4xn1?x???????????234n

S=1

INPUT TO X INPUT TO N FOR I=1 TO N S=S+X^I/I ENDFOR

?“SUM=”,S

14.输出3-100之间的所有素数，并求其和。 SUM=0

FOR J=3 TO 100 FLAG=.T.

FOR I=2 TO SQRT(J) IF MOD(J,I)=0 FLAG=.F. EXIT ENDIF ENDFOR IF FLAG=.T. ?J

SUM=SUM+J ENDIF ENDFOR

?\奇数之和是:\

②方程类

1.完成下面分段函数的计算，程序运行时用户从键盘输入一个数值X，在屏幕上输出Y值。

?x2?Y??0

??x2?ifififx?0x?0x?0

INPUT \请输入X值：\IF X>0 Y=X*X ELSE

IF X=0 Y=0 ELSE