vfp考试题.docVIP

5.2 结构化程序设计_读程序题目 1. 运行下列程序以后，显示运行的前二次结果： SET TALK OFF S＝“ABCDEF” N=LEN(S) K=1 DO WHILE K=N ?SUBS(S,K,N-K) K=K+1 ENDDO 结果：——————、—————— 幻灯片38 5.2 结构化程序设计_读程序题目 2.执行下列程序后，屏幕上显示的运行结果为 。 CLEAR STORE 3.14 TO PI r=4 S=PI*r*r ?INT(S) 幻灯片39 5.2 结构化程序设计_读程序题目 3.运行下列程序，运行结果的第二行为 。 SET TALK OFF CLEAR Y=111111111 FOR I=1 TO 8 X=LEFT(Y,I) ?SPAC(20-I*2)+X+*+X+=+ALLT(STR(VAL(X)*VAL(X))) ENDFOR 幻灯片40 5.2 结构化程序设计_读程序题目 4.执行下列程序后，屏幕上显示的运行结果为 。 CLEAR x=10 y=4 IF x0 y=2*x-2 else y=x**2 ENDIF ?y 幻灯片41 5.2 结构化程序设计_读程序题目 5.执行下列程序后，屏幕上显示的运行结果为 。 S=0 N=1 Do While N=5 S=S+N N=N+1 ENDDO ?S 幻灯片42 5.2 结构化程序设计_完善程序题目 1.下列程序的功能是求100以内的偶数之和及奇数之和。 P=0 Q=0 FOR N=1 TO 100 IF _____________ P=P+N ELSE _____________ ENDIF ENDFOR ?“偶数和为”, P ?“奇数和为”, Q 幻灯片43 5.2 结构化程序设计_完善程序题目 2.下列程序用来求0~100偶数之和，请完善。 STORE 0 TO N,S DO WHILE .T. IF N100 _________ ELSE S=S+N ENDIF N=N+2 ENDDO 幻灯片44 5.2 结构化程序设计_完善程序题目 3.下列程序是随机产生一个70-80之间的数，请完善 x=0 DO WHILE .T. X=RAND( )*100 IF x70 AND x80 _________ ENDIF ENDDO ?x 幻灯片45 5.2 结构化程序设计_完善程序题目 4. 下列程序功能是计算1!+2!+…+10!的和,请完善。 Result=0 nMult= _________ FOR n=1 TO 10 nMult=nMult*n nResult=_________ ENDFOR ?nResult 幻灯片46 5.2 结构化程序设计_完善程序题目 5.完善下列程序，使其计算一个整数的各位数字之和： SET TALK OFF INPUT ”x=” TO x s=0 DO WHILE x！=0 s=s+MOD（x,10） x=INT(__________) ENDDO ?s SET TALK ON 幻灯片47 5.2 结构化程序设计_完善程序题目 6.dtocc()函数实现将一个日期型数据转换为形如“XXXX年XX月XX日”的中文日期字符串，请完善。 FUNCTION dtocc PARAMETERS deDate cYear= +’年’ cMonth= STR(Month(deDate),2) +’月’ cDay= STR(Day(deDate),2) +’日’ RETURN ENDFUNC 幻灯片48 5.2 结构化程序设计_完善程序题目 7.完善下列程序,是其可用来求长方形的面积。? X=3 ?Y=5 ?S=AREA(X，Y) ??S ?FUNCTION???? AREA ??????? _______ ??? S1=X*Y RETURN? ________ ENDFUNCTION