use库名 aver all工资tox @5,5say‘平均工资:’+str(x) wait use retu CX1 CX2 CX3 CX4 N,5C,8 modi comm Cx1 set talk off use库名 5,10say‘请输入编号:’getx read姓名 loca all for编号 if. not. eof ( DO while. NoT. eof() Di Wait修改 Enddo El 5,10say“查无此人’ walt endif 5,10say‘是否继续查找(Y/N)’gety read修改 if uppe(y)<>‘Y use retu endif 题目:职工系统 要求:对职工进行输入、修改、查询、删除、统计计算等处理。 其中:修改要球能够按照编号、姓名、性别、工资进行F use 库名 x=0 aver all 工资 to x @ 5，5 say ‘平均工资：’+ str（x） wait use retu ————————————————————————————— CX1 CX2 CX3 CX4 N，5 C，8 .modi comm CX1 clea set talk off use 库名 DO while .T. X=0 Clea @ 5，10 say ‘请输入编号：’ get x read 姓名 loca all for 编号=x if .NOT. eof（ ） DO while .NOT. eof（ ） Disp Wait 修改 Cont Enddo Else @ 5，10 say ‘查无此人’ wait endif clea y=‘ ’ @ 5，10 say ‘是否继续查找（Y/N）’ get y read 修改 if uppe（y）< >‘Y’ use clea retu endif enddo ————————————————————————————— 题目：职工系统 要求：对职工进行输入、修改、查询、删除、统计计算等处理。 其中：修改要球能够按照编号、姓名、性别、工资进行