disp next 4 use
11. 执行下列程序后的输出结果是______。 x=3 if x>=0 y=2*x else y=x*x endif ?y
12. 执行下列程序，显示的结果是 ________ 。
x=\计算机等级考试\y=\z=len(x)
do while z>=1
y=y+substrx,z-1,2) z=z-2 enddo ?y
13. 执行下列程序后的输出结果是______。
cv=\do case
case upper(cv)>= \ ?cv,\是字母\
case cv>=\ ?cv,\是数字\ otherwise
?cv,\是特殊符号\
endcase
14. 针对第三题teacher表，下列程序段完成的功能是 。use teacher sum=0
do while not eof()
if 职称=\教授\系部=\中文系\ sum=sum+1 skip else skip endif enddo use ?sum
15. 执行下列程序后的输出结果是______。
ye=2002
if mod(ye,4)=0 .and. mod(ye,100)<>0 .or. mod(ye,400)=0 ?ye,\年是闰年\else
?ye,\年不是闰年\
Endif
16. 执行下列程序，显示的结果是 。
t=0
for k = 3 to 21 step 3
t=t+k endfor ? t
17. 针对第三题order表，下列程序段完成的功能是 。use order n=0
do while not eof()
if 职工号=\金额>=10000
n=n+1 skip else skip
11
endif enddo ? n
18. 针对第三题order表，下列程序段完成的功能是 。
use order
do while not eof()
if 订购日期<{^2008-01-01} delete skip else skip endif enddo
19. 针对第三题student表，下列程序段完成的功能是 。use student
index on 籍贯 tag jg seek \山东\
do while籍贯= \山东\ display skip enddo use
20. 针对第三题student表，此程序完成的功能是 。
use student
accept \输入姓名：\ name locate for 姓名=name if found()
display else
? \查无此人！\
endif 六、编程题
1．从键盘上输入一个数，求该数的绝对值。
2．从键盘上输入10个数，编程找出其中的最大值和最小值。 3．编程求1+2+3+??+100之间所有数的和
4．从键盘输入一个三位的正整数，判断该数是否是水仙花数（所谓水仙花数是指一个3位数，其各位数字的立方和等于该数本身），若是则输出\，否则输出\。 5．从键盘输入一字符串，若该字符串为“123”，显示“欢迎使用本系统!”，否则，显示“口令错误，请核实后再输！”。
6．计算自然数中前多少个数之和大于999。 7．求100~200之间所有偶数的和。 8．编程实现如下分段函数。
?1,x??10y???7x3?3x?5,?10?x?10
??10x2?4x?100,x???109．计算1~ 100之间所有3的倍数之和（即3+6+9+??+99）。
10．某地“特快专递” 的计费标准是：邮件重量100克以内， 每克为0.05元，但超出100克后，超出数每克为0.02元。编写程序计算邮费。 11．从键盘上输入任一正整数n，求s=1+2+??+n并输出。
12．输入学生的考试成绩，判断并输出其成绩等级：A级（90及90分以上）、B级（大于等于80分并且小于90分）、C级（大于等于70分并且小于80分）、D级（大于等于60分并且小于70分）和E级（小于60分）。
13．从键盘上输入两个数a和b，按从大到小输出a和b的值。 14．编程求P = 1 !＋2 !＋3 !＋????＋10!。
15．判断某年是否为闰年。闰年的条件是：年份能被400整除，或者年份能被4整除但不能同时被100整除。 16．编程求p=12+32+??+102
17．从键盘上输入一个数，求该数的相反数。
18.从键盘输入一个数，判断该数是否为素数（除了1和它本身之外不能被其他数整除的数）。
19. 从键盘输入10个学生成绩，统计其中及格与不及格的人数。
20.有一数列：1，1，2，3，5，8，13，21，??求出这个数列的前20项之和。 21.编程打印由“*”组成的三角形或平行四边形。
12