jacky
问题补充说明：拜托了.. 程序填空题 已知数据表如下表所示, 表名称为ZGQK.DBF。 根据要求完成相应的题目： Record# 编号 姓名 性别 出生日期 婚否 职称 实发工资 简历 1 94001 张志强 男 09/04/38 .T. 副教授 815.00 Memo 2 94010 王龙 男 12/05/58 .F. 讲师 458.00 Memo 3 94015 李丽 女 11/03/55 .T. 实验员 424.00 Memo 4 94023 刘勇 男 08/25/70 .T. 助教 365.00 Memo 5 94034 徐大伟 男 02/16/50 .F. 副教授 547.00 Memo 6 94040 李静 女 03/22/72 .F. 实验员 353.00 Memo 7 94055 陈红 女 07/06/65 .T. 讲师 455.00 Memo 1、 使用传统的FoxPro方法，列出你要查询的职工的情况。 USE ZGQK ACCEPT "请输入待查职工的姓名：" TO XSXM LOCA for 姓名＝XSXM IF ( ) ? "查无此人" ELSE （ ） ENDIF 2、补充命令序列，查找所有姓李的并且出生日期是1972年以后出生的，并显示其记录的姓名、出生日期字段 Use ZGQK Local for （ ） Do while .not. eof( ) Disp（ ） Cont enddo 3、本程序是求所有职称是副教授的工资之和，请完成该程序。 USE ZGQK s＝0 loca for 职称＝“副教授” （ ） （ ） cont enddo 4、本程序是求100以内能同时被3和9除尽的数的和的程序，请补充完整。 s＝0 for i=1 to 100 （ ） （ ） endif endfor 5、请写出下面程序执行后的结果（ ） USE ZGQK GO 5 Skip －2 IF 实发工资>=800 ? “高级工“ else if 实发工资>=500 ？“中级工” else if实发工资>=400 ？“初级工” else ？“试用期” endif endif endif
1、使用传统的FoxPro方法，列出你要查询的职工的情况。
USEZGQK
ACCEP360问答T"请输入待查职工的姓名："TOXSXM
LOCAfor姓名＝XSXM
IF(.no巴止让的轴斯排基周限振t.found())
?"查无此人"
ELSE
（Dis完审左做市告食众前销play）
ENDIF
2、补充命令序列，查找所有姓李的并且出生日期是197便假至稳七于兴2年以后出生的，弦并显示其记录的姓名、出生日期字段
UseZGQK
Localfor（substr(姓名,1,2)='距松李'.and.yser(医出生日期)>=1972)
Dowhile.not.eo师f()
Disp（姓名,出生日期）
Cont
enddo
3绝采支低黑情儿为倍误否、本程序是求所有职称是副教授的工资之和，请完成该程校民掌余校坐同序。
USEZGQK
s＝0
locafor职称＝“副教授”
（Dowhile路友失她笔.not.eof()）
（s=s+实发工资）
cont
enddo
4、本程序是求100以内能同时被3和9除尽的数的和的程序，请补充完整。
s＝0
fori=1to1哪未言跑督直怀服死00
（ifmod(i,9)=七次造换协加革西液=0）
（s=s+i）
endif
endfor
丝政步表火定注：除尽的概念是整除吗？那么能被9整除的一定能象九停被3整除
5、请写出下面程序执行后的结果（）
USEZGQK
GO5
Ski岁检红老玉p－2
IF实发工资>=800
?“高级工“
else
if实发工资>=500
？“中级工”
els苏土e
if实发工资>=400
？“初级工”
else
？“试用期”
endif
endif
endif
初级工
