vf大题练习必看.docVIP

1 ） 用VF编写程序求200以内所有奇数的和 clear s=0 for i=1 to 200 step 2 s=s+i endfor ?200以内所有奇数的和:,s 2） 编写程序求300以内所有偶数的和。 clear s=0 for i=2 to 300 step 2 s=s+i endfor ?s 3 ）使用VF编写一个输出3~100之间所有素数的程序 CLEAR FOR m=3 TO 100 STEP 2 n = INT(SQRT(m)) FOR i = 3 TO n IF MOD(m,i) = 0 EXIT ENDIF ENDFOR IF i n ??m ENDIF ENDFOR 或者 clear for n=3 to 100 step 2 for i=2 to n/2 if mod(n,i)=0 exit endif endfor if in/2 ?n endif endfor return 4 ）编写程序求(4!+7!)*3!。 clear s=0 t=1 for i=1 to 4 step 1 t=t*i endfor s=s+t t=1 for i=1 to 7 t=t*i endfor s=s+t t=1 for i=1 to 3 t=t*i endfor s=s*t ?s return 5 ）从键盘输入15个数，求其中最大数与最小数的差。 clear i=15 dime a(i) for n=1 to 15 ? 第,n,个数据: input 请输入数字后按回车键： to a if n=1 b=a(1) c=a(1) else if a(i)b b=a(i) else if a(i)c c=a(i) endif endif endif endfor ? 最大的数是：,b ? 最小的数是：,c ? 最大数与最小数的差是：,b-c 6 ）VF编写程序计算1！+2！+3！+…+10！ clear s=0 for i=1 to 10 k=1 for j=1 to i k=k*j endfor s=s+k endfor ?1！+2！+3！+....+10！=,s 7） 求100以内所有能被3整除的整数的和 clear s=0 for i=1 to 100 if i%3=0 s=s+i endif endfor ?100以内所有能被3整除的整数的和是：,s 8.3!+8!+11!的和 clear s=0 t=1 for i=1 to 3 step 1 t=t*i endfor s=s+t t=1 for i=1 to 8 t=t*i endfor s=s+t t=1 for i=1 to 11 t=t*i endfor s=s+t ?s return 9 )编写程序求下面的分段函数Y的值 当x2时 ，y=x; 当2=x=10时 y=2x; 当x10时 y=-3x; 解：clear input 请输入x的值： to x do case case x2 y=x case x=2 and x=10 y=2x case x10 y=-3*x endcase ?y的值是：,y 10) VF编写程序找出输入8个数中的最小数 clear input请输入一个数:to x store x to min for i=2 to 8 input请输入一个数:to x if xmin min=x endif endfor ?min return 11)VFP写程序统计3-200之间的素数个数SuShuGe=0 素数个for sushu=3 to 200 SuShuFt=.t. for aa=2 to SuShu-1 if mod(SuShu,aa)=0