资源描述：
《VF90期末实验题库答案全解》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、第一部分基础题1.先用赋值语句分别为变量X、Y、Z赋初值为200、300、400,然后要求输出:①[(X-2Y)/(2-Z)]*Y②Y>100或Y<050■单位字符型4表设计器・Bl.dbf索引表名称类型竟度小数位数索引null□职工号宇符型□姓名宁符型□性别字符型□姻否逻辑型□出生日期曰期型□基本工
2、资数值型□部门宁符型□简历备注型□照片通用型6811882644显示库（U：.■/表设计器・商民.dbf宽度小数位数索引null显示字段索引表名称类型□□□□□□号名■品品别存价位商商类库单单型型型型別亠符符符值值宇宀子宇数数格式9）：L输入掩码（処）：「标题⑼I宁段有效性规则迟）:信息9）：「默认值®
3、匹酉i!宇段类型到类3.统计职工表的职工总人数以及男、女职工的人数。USE职工COUNTTOZRSCOUNTFOR性别二”男”TOMZGCOUNTFOR性别二”女nTOWZG?”总人数=H+STR(ZRS,2),n男职工人数=H+STR(MZG,1),;总人数=10男职工人数二6女职
4、工人数=4”女职工人数=,+STR(WZG,l)命令USEUSE职工COUNTTOZRSCOUNTFOR性另l]="男"TOMZGCOUNTFOR咗勇女"TOWZG?"总人数二“+STR広空2),隅职工人数二"+STR®ZG」)‘;"女职工人数T+STRCWZG,1)4.编写程序，修改并显示指定职工的基本工资。NOTE修改并显示指定职工的基本工资SETTALKOFFCLEARUSE职工ACCEPT”请输入职工号:”TOZGIILOCATEFOR职工号=ZGHIF!EOF（）REPLACE基本工资WITH基本工资+200?职工号，姓名，基本工资ELSE?”没有找到!”ENDIFUSES
5、ETTALKON请输入199701圍修改并显示指疋职工的基本工资・prg1199701李红2700.00SETTALKOFFCLEARUSE职工；ACCEPT"请输入职工号:"TOZGHLJ3CATEFOR匝壬号二ZGHIF!EOF()REPLACE基本工资WITH基本工资+200?职工号，姓名，基本工资ELSE厂没有找到「ENDIFUSESETTALKON3.编写程序，火车托运行李，根据行李的重量计算托运费。收费标准假设是0.60元/千克。由用户输入货物的重量，请计算并输出所需要的托运费。SETTALKOFFCLEARINPUT”请输入货物的重量(Kg)：°TOWF=W*0.60?
6、”货物重量n+ALLTRIM(STR(W,19,2))+n千克需要的托运费为：”；+ALLTRIM(STR(F,19,2))+n元,SETTALKON请输入货物的輕胞)：56國计算扭錨・prg货物重重56.00千克需要的托运费为：33.60元SETTALKOFFCLEARINPUT“请输入货物的重莹(Kg)：wTOWF=W*O.60?"货物重S^+ALLTRIM(STR他⑸2))+"千克需要的托运费为：";+ALLTRIM(STROP」9,2))+"元"SETTALKON6•编写程序，求“职工”表中指定部门(如直销、零售)全体职工的基本工资总额。NOTE求指定部门基本工资总额SETT
7、ALKOFFCLEARUSE职工ACCEPT”请输入指定部门：”TOBMSUM基本工资TOJBGZFOR部门二BM?BM+”部全体职工的基本工资为:”+STR(基本工资,8.2)USESETTALKON请输入指定部门：直辛肖直梢部全体題工的基本工资为:0.00圍对號部门基本工资总额・prgNOTE求指部门基本工资总额SETTALKOFFCLEARUSE职工ACCEPT“请输入指定部门："TOBMSUM基本工资TOJBGZFOR部门二BM?BM+^部全体职工的基本工资为：齢STR(基本工资，8,2)USESETTALKON7•编写程序，如果在例题5中，当重量不超过50kg时，按每千克0
8、・60元收费；当重量超过50炮，超岀50kg的部分按每千克0・90元收费。试编写程序计算托运费。SETTALKOFFCLEARINPUT*it输入货物的重量(Kg)：nTOWIFWv二50F=W»0.60ELSEF=50*0・6+(W・50)*0・9ENDIF?“货物重量”+ALLTRIM(STRQY,19,2))+“千克需要的托运费为：”；+ALLTRIM(STR(F,19,2))+M元”SETTALKON请输入货物的重重OCd:56货物重里56.00千
