vfp读程序.doc 3页

读程序 有如下程序STORE O TO N，S DO WHILE.T. N=N+1 S=S+N IF N>=1O EXIT ENDIF ENDDO ？”S=“+STR（S，2）设成绩库CJK.DBF中“数学”（数值型字段）这门课程的学分为4，其学分计算的方法如下：数学＞=90,学分值为4 80<=数学<90,学分值为3 70<=数学<80,学分值为2 60<=数学<70,学分值为1数学<60,学分值为0计算任一学生数学这门课程的学分值的程序如下USE CJK XH=0 XF=0 SAY”请输入学号：” GET XH LOCATE FOR学号=XH DO CASE CASE______ XF=4 CASE______ XF=3 CASE__________ XF=2 CASE__________ XF=1 OTHERWISE XF=0 ENDCASE ?"学号:",XH?"数学的学分值:",XF USE RETURN 读程序填空 用两种循环步长值来求1+2+3+...50的值，请将程序填写完整。程序一：S=0 FOR__（1）___ S=S+N ENDFOR ? S RETURN 程序二: S=0 FOR__（2）___S=S+N ENDFOR ?S RETURN 有如下程序当变量I在奇偶之间变化时，求出下面程序的输出结果。CLEAR I=O DO WHILE I<10 IF INT(I/2)=I/2 ?"W" ENDIF ?"T" I=I+1 ENDDO 给出以下程序的运行结果 X=0 Y=0 DO WHILE X<100 X=X+1 IF INT(X/2)=X/2 LOOP ELSE Y=Y+X ENDIF ENDDO ?"Y=",Y RETURN 给出以下程序运行结果 CLEAR M=0 N=100 DO WHILE N>M M=M+N N=N-10 ENDDO ? M RETURN 编程题： 编写程序，求1到100中能被3整除的数的和。 编写程序，计算10! 3