VFP笔试试题复习.docVIP

4.2. 1表操作题 78统计出rsda.dbf表中职称为“工程师”的人数， Use rsda , store 0 to s , locate for 职称=“工程师” ， do while not eof() , s=s+1 , continue , enddo 461 计算机等级考试成绩 笔试和上机均大于等于80 优秀 Use student , do while .not.eof() , if 笔试=80 and 上机=80 , REPL 等级 with“优秀” , endif , skip , enddo , list 462 由工资表。Dbf 按性别汇总工资 Use 工资表 ， index on 性别 to sy , total on 性别 to 汇总.dbf fildes 工资 ， use 汇总 ， list 4.2.2求和题： 437计算num的各位上的数字之和，将结果存入变量out中，用DO WHILE实现。 s=0 , DO WHILE num0, s=s+num%10, num=int(num/10), enddo , out=s , ?out. 457求p=1-1/（2*2）+1/(3*3)-1/(4*4)+1/(5*5)结果存在out中，用 DO WHILE实现 P=0, M=1, DO WHILE M=5 , P=P+((-1)^(M+1))/(M*M), M=M+1, ENDDO , ?P=,P ,OUT=P 414求p=1+1/（2*2）+1/(3*3)+````````1/(10*10)将结果存入变量out中，用DO WHILE实现 P=0, M=1, DO WHILE M=10 ， P=P+1/(M*M) , M=M+1 , ENDDO , ?”P=”,P , OUT=P 73输出10到50之间所有能被7整除的数（用do while实现）并将这些数存入out中 i=10 , S=0 , do while i=50 , if i%7=0 , ?i , S=S+i , endif , i=i+1 , enddo , OUT=s 79用子程序求出1~15之间的能被3整除的整数的平方和。将结果存入变量OUT中，要求用for循环实现。 N=1 , S=0 , FOR N=1 TO 15 , IF N%3=0 , S=S+N*N , ENDIF , ENDFOR , ?S , SET TALK ON , OUT=S 86用循环求出1~15之间能被3整除的整数的阶乘和存入变量out中，要求用for循环语句 T=1 , FOR N=1 TO 15 , T=T*N , IF N%3=0 , OUT=OUT+T , ENDIF , ENDFOR , ?OUT 87从键盘输入一个整数，输出所有能整除该数，并且本身也能被3整除的数的和。（eg 输入6，输出3,6）结果存于变量x中，要求用for实现。 FOR N=1 TO A , IF A%N=0.AND.N%3=0 , ?N , x=x+N ， ENDIF , ENDFOR 71求出并显示3！+4！+5！的值，将结果存入变量out中，要求用for编程。 S=0 , FOR I=3 TO 5 , p=1 , FOR J=1 TO I , p=p*J , ENDFOR , S=S+p ， endfor ， ？“3！+4！+5！的值是：”，s ， OUT=S 93求1~200间的所有偶数的和，结果输入变量OUT中，要求用for循环语句实现。 S=0 , FOR I=1TO 200 ， IF I/2=INT(I/2) , S=S+I , ENDIF , ENDFOR , ?S , OUT=S 97编程打印一数列，前两个数是0、1，第三个数是前两个数之和，以后每个数都是其前两个数之和。编程求出第20个数，将结果存入out中，要求用for循环语句实现 a=0 , B=1 , for i=3 to 20 , c=a+b , a=b , b=c , endfor , ?”c=”,c , out=c 455编程求sum=3-33+333-3333+33333 S=0 , t=0 , d=3 , for i=1 to 5 , t=t+d , s=s+t*(-1)^(