1、1程序练习1在 Visual FoxPro ,有如下程序:N=2I=1DO WHILE N=3000,则上浮3%,若 工资= 3000 2REPLACE 工资 WITH 工资 * 1.03ELSE(2)_END IFEND SCANUSE2、SET TALK OFFACCEPT “输入表名:“ TO KMUSE &KM*显示最前面 5条记录(3)_WAIT GO BOTTOM*显示最后 4条记录(4)_DISP NEXT 4USE1、阅读下列程序sum=0k=1m=5DO WHILE sum=1b=b+SUBSTR(a,i,1)i=i-1ENDDO?b上述程序执行后,显示的结果是_。4、阅读下
2、列程序: x=76543y=0DO WHILE x0y=x%10+y*10x=int(x/10)ENDDO上述程序段执行以后,内存变量 y 的值是_1、阅读下面程序s=1i=0do while i=1two=two+SUBSTR(one,i,1)i=i-1ENDDO?two执行上述程序,显示的结果是 。4. 阅读下面程序:Clear N=10S=0I=1Do while I=1two=two+SUBSTR(one,i,1)i=i-1ENDDO?two执行上述程序,显示的结果是 。4. 阅读下面程序:Clear 6N=10S=0I=1Do while IMM=M+NN=N-10ENDDO?M上述
3、程序执行后,显示的结果是_。4.阅读下列程序: x=10y=0DO WHILE x0y=x+y*2x=int(x/10)7ENDDO?y上述程序段执行以后,内存变量 y 的值是_。1. 在 Visual FoxProk ,有如下程序:*Test.prg * sub1.prgSET TALK OFF procedu sub1PRIVATE X,Y local XX= “数据库” X= “应用”Y= “管理系统” Y= “系统”DO sub1 X=X+Y? X+Y RETURNRETURN执行命令 DO test 后,屏幕显示的结果应是 。2. 以下循环体共执行了 次。FOR =1 TO 10=+
4、1?ENDFOR3在 Visual FoxPro 中,有如下程序,函数 IIF( )的返回值是 。Private X, YStore “男” TO XY=LEN(X)+2? IIF(Y0y=y+x%10x=int(x/10)ENDDO?y3、下面程序计算一个整数的各位数字之和。在下划线处应填写的语句是SET TALK OFF INPUT ”x=”TO x s=0 DO WHILE x!=0s=s+MOD(x,10) ENDDO ?s SET TALK ON4、从键盘输入数字 234,下列程序段的输出结果是 。ACCEPT TO AIF A=123456S=0ENDIFS=1?SRETURN1.
5、 下面程序的运行结果是 。X=3DO CASE9CASE X1Y=1CASE X2Y=2ENDCASE?YRETU2. 以下循环体共执行了 次。FOR I=1 TO 10I=I+1?IENDFOR3阅读下面程序:a=“foxpro“b=“i=LEN(a)DO WHILE i=1b=b+SUBSTR(a,i,1)i=i-1ENDDO?b上述程序执行后,显示的结果是_。4、阅读下列程序: x=76543y=0DO WHILE x0y=x%10+y*10x=int(x/10)ENDDO?y上述程序段执行以后,内存变量 y 的值是_1. 下面程序的运行结果是 。X=3DO CASECASE X5Y=1CASE X2Y=2ENDCASE10?YRETU2. 以下循环体共执行了 次。FOR I=1 TO 10I=I+2?IENDFOR3阅读下面程序:a=“I love this game“b=“i=LEN(a)DO WHILE i=1b=b+SUBSTR(a,i,1)i=i-1ENDDO?b上述程序执行后,显示的结果是_。4、阅读下列程序: x=11969155y=0DO WHILE x0y=x%10+y*10x=int(x/10)ENDDO?y上述程序段执行以后,内存变量 y 的值是_