复习资料习题讲解_序调试题.docVIP

2.6 VFP程序调试题 一、数值 1．输出给定的正实数值表达式的值中组成数码的最大数码和最小数码 如：数值2345.105中最大数码为5，而最小数码为0 SET TALK OFF CLEAR INPUT M TO M N M DO WHILE int n n ______ 1 N N*10 ENDDO STORE mod n,10 to d,x ______ 2 Do while n 0 _______ 3 R mod n,10 ______ 4 IF R D D R ENDIF IF R X X R ENDIF N int n/10 _______ 5 ENDDO ?M,中位值最大的数码是：+STR D,1 +,最小的数码是：+STR X,1 + 。 SET TALK ON 2A．计算算式 M!+N! / M-N !+M^N+M^M M/N,，M、N的值从键盘输入。 SET TALK OFF CLEAR INPUT M TO M INPUT N TO N SM M DO JC WITH SM SN N DO JC WITH SN SMN M-N DO JC WITH SMN CMN N DO MC WITH M,CMN DO MC with m,m ___ 1 ? SM+SN / SMN+CMN+M SET TALK ON PROC JC Para x ____ 2 T 1 FOR I 1 TO X T T*I ENDFOR X t _____ 3 RETURN PROC MC Para x,y _______ 4 T 1 FOR J 1 TO Y T T*X ENDFOR Y t _________ 5 RETURN 2B. 另一种方法：计算算式 M!+N! / M-N !+M^N+M^M M/N,，M、N的值从键盘输入。 SET TALK OFF CLEAR INPUT M TO M INPUT N TO N X M DO JC SM x ___________ 1 X N DO JC SN X X M-N DO JC SMN X Z M Y N DO MC CMN Y Y M DO MC CMM y _________ 2 ? sm+sn / smn+cmn+cmm *m/n ________ 3 SET TALK ON PROC JC T 1 FOR I 1 TO X T T*I ENDFOR X t _________ 4 RETURN PROC MC T 1 FOR J 1 TO Y T T*Z ENDFOR Y t __________ 5 RETURN 3．要求：输出素数及素数计数，输出1~M 正整数，从键盘输入 中素数及素数计数。 SET TALK OFF CLEAR INPUT M TO M S 0 ________ 1 FOR I M TO 1 STEP -1 IF SS I _______ 2 S S+1 STR I,5 ENDIF ENDFOR _______ 3 ?STR S,5 SET TALK ON FUNC SS PARA X FOR J 2 TO X-1 IF INT X/J X/J EXIT _______ 4 ENDIF ENDFOR IF J X ________ 5 RETURN .T. ELSE RETURN .F. ENDIF 4．从键盘输入A、B、C三个数值，将它们从小到大排列后输出。 SET TALK OFF CLEAR INPUT A TO A INPUT B TO B INPUT “C ” TO C 1 IF A B 2 T A A B B T ENDIF IF A C 3 T A A C C T ENDIF IF B C 4 T B B C C T ENDIF ?A,B,C 5 SET TALK ON 5．要求： 1 求SINX的值 SINX X- X^3 /3!+ X^5 /5!- X^7 /7!+...+ -1 ^ N-1 * X^ 2*N-1 / 2*N-1 ! 2 X从键盘输入，当上述算式的最后一项的值小于或等于10^ -5 时，结束运算。 SET TALK OFF CLEAR INPUT X TO X S 0 STORE 1 TO T1,T2,I T3 -1 DO WHILE ABS T1/T2 1E-5 _________ 1 STORE 1 TO T1,T2 FOR J 1 TO 2*I-1 T1 T1*X __ 2注意：本题中S的初值为0 T2 T2*J _________ 3 T3 -T3