程序运行结果练习题

4有如下程序，函数iif( )返回值是_____
*程序
Private X,Y
Stroe“男”to X
Y=len(X)+2
?iif(Y<4,”男”，”女”)
Return
4、s=0
for n=100 to1 step -1
s=s+n
endfor
?s
Return
________________
5、clear
enddo
return
______________
14、主程序tt .prg
Public a
a=3
b=4
c=5
Do ss
?”2.a,b,c,d=”,a,b,cd
Return
运行tt的结果是______
*ss.prg
Private c
a=a+1
b=10
c=20
d=30
?”1.a,b,c,d=”,a,b,c,d
s=5
do B
？s
Return
Procedure B
S=S+10
Return
_______________________________
3、set talk off
s=0
i=5
x=11
do while s<=x
s=s+1
i=i+1
enddo
?s
Set talk on
_____________________
8、clear
store 0 to a,b,s,i,j
do while i<=5
i=i+1
if i=3
a=s
j=i
loop
else
s=s+i
endif
if i=4
b=s+a
j=j+i
exit
else
s=s+i
endif
enddo
?S
___________
9、main.prg
set talk off
a=5
Set talk off
x=5
y=10
set procedure to proc1
do p1
?x,y
Do p2
?x,y
Set procedure to
*proc1.prg
Procedure p1
x=x*5
y=y+5
return
procedure p2
x=10
y=x+20
return
18、set talk off
DO WHILE X<3
S=S+LC(X)
X=X+1
ENDDO
? S
SET TALK ON
RETURN
FUNCTION LC
PARAMETERS P
P=P+1
RETURN P*P
程序运行后，S的值是。
21、下面的程序运行后,变量N的值为。
SET TALK OFF
CLEAR
S=0
FOR N=1 TO 10 STEP 3
___________________
6、dime a(6)
a(1)=1
a(2)=2
for i=3 to 6
a(i)=a（i-1）+a(i-2)
next
?a(6)
____________________
7、accept to a
if A=[123]
s=o
endif
s=1
？s
_______________
SET TALK OFF
STORE 0 TO I,J
X=3
Y=0
DO P1 WITH X,Y
?X,Y
SET TALK ON
RETURN
PROCEDURE P1
PARAMETERS X,Y
I=1
DO WHILE I<=3
X=X+I
I=I+1
ENDDO
Y=X+Y
DO P2 WITH X
RETURN
PROCEDURE P2
PARAMETERS X
X=1
RETURN
运行上面的程序，显示的结果为：
26、有学生信息.dbf自由表，字段为：学号（C，8），姓名（C，8），性别（C，2），年龄（N,3,0）,籍贯（C，20），入学成绩（N,5,1），表中数据如下：
Record# 学号姓名性别年龄 籍贯入学成绩
120100101肖天海男19 河北保定 560
x=x+1
endif
enddo
?x
?y
_______________
17、n=3
do while n<=10
i=3
x=0
do while i<=n/2
if int (n/i)<>n/i
i=i+1
else
x=1
exit
endif
enddo
if x=0
??n
Endif
n=n+1
enddo
return
17、*pp.prg
220100102王岩盐男20北京623
320100103刘星魂男18上海559
420100104张月新女19南京610
520100201李明玉男20江苏常州623
6 20100202季欣欣 女19辽宁沈阳580
7 20100203王吉吉女22吉林长春612
有如下Visual FoxPro程序
SET TALK OFF
11、set talk off
Dimension k(2,3)
i=1
do while i<=2
j=1
do while j<=3
k(i,j)=i*j
if int(k(i,j)/2)=k(i,j)/2
k(i,j)=k(i,j)+1
else
k(i,j)=k(i,j)-1
endif
??k(i,j)
??
j=j+1
enddo
?i=i+1
Enddo
Returnຫໍສະໝຸດ Baidu
_________________
12、x=1
y=1
do while y<6
x=x*y
y=y+1
loop
print x
______________
13、m=1
Do while m<5
n=1
??m
Do while n<=m
tt=n+m
n=n+1
enddo
?
m=m+1
h=h*2
if h>=16
exit
endif
n=n+1
enddo
?"循环次数为：",n
执行结果为：。
24、已知有数据库文件职工工资.dbc，数据库中包含表“工资.dbf”，工资.dbf的表结构为：
职工号（C，4）,姓名（C，8）,性别（C，2）,职称（C，8）,基本工资（N，8,1）。
有Visual FoxPro程序5_2.prg如下：
3 990003 赵小芳 女02/16/80应用数学 舞蹈 团员
8 990103 曲丽芳 女03/03/78计算机应用 摄影 团员
CLEA
USESTUD
SCAN FOR 性别="男"
?RECNO(),编号
ENDSCAN
USE
RETU
输出结果为：。
23、set talk off
n=1
h=0.5
do while .t.
一、程序运行结果
1、假设数据表文件成绩表中有“总分”字段，运行下列程序段
Use成绩
X1=0
SCAN
X1=MAX(总分，X1)
Endscan
？X1
RETURN
执行该程序后X1显示的值为成绩表中的__________________________
2、clear
do A
return
procedure A
CLEAR
OPEN DATABASE职工工资
USE工资
STORE 0 TO m,n
GOTO TOP
m=基本工资
n=基本工资
SCAN FOR职称="副教授"
IF m<=基本工资
m=基本工资
ELSE
IF n>=基本工资
n=基本工资
ENDIF
ENDIF
ENDSCAN
?m
?n
该程序的功能是：
25、有如下Visual FoxPro程序：
xs=0
for n=1 to 100
xs=xs+n
end for
?xs
Retrun
___________
19、set talk off
i=1
do whilei<=4
j=1
do while j<=5
??”*”
j=j+1
enddo
?
i=i+1
enddo
20、SET TALK OFF
CLEAR
X=1
S=0
STORE 0TO M,N
USE 学生信息
INDEX ON 性别 TAG 性别 OF ABSEX
SEEK "男"
DO WHILE 性别="男" AND .NOT.EOF()
N=N+1
M=M+年龄
SKIP
ENDDO
?M/N
SET TALK ON
运行上面的程序，显示的结果为：
return
15、x=2
Do while x<4
y=1
do while y<4
if x*y<5
？x,y
y=y+1
else
exit
endif
enddo
x=x+1
enddo
return
__________
16、x=1
y=20
edo while x<y
if mod(x,2)<>0
x=x^2+1
y=y+1
else
IF N>10
EXIT
ENDIF
S=S+N
N=N+3
ENDFOR
?N
SET TALK ON
RETURN
22、数据表stud.dbf的内容如下：
记录号 学号 姓名 性别 出生日期专业特长 政治面貌
1 990001王晓东男10/03/80应用数学书法 团员
2 990002 李子清 男05/12/79应用数学 运动 党员
set talk off
store 1 to i,a,b
do while i<=3
do prog1
“p(“+str(I,1)+”)=”+str(A,2)+”,”
i=i+1
enddo
??”b=”+str(b,2)
Return
Procdure prog1
a=a*2
b=b+a
set talk on
return
b=”c”
c=10
do p1 with b
?a,b,c
set talk off
return
p1.prg
parameters a
b=”a”
&b=&a
Do p2
?a,b,c
Return
p2.prg
if c=&b
return to master
else
return
endif
运行main.prg的结果为____________