填空题 假设由工资数据库CZ.DBF: Record # 姓名 实发工资 百元 伍十元 拾元 五元 壹元 伍角 1 李敏 486.50 2 王永明 390.50 要求将GZ.DBF中每个人的实发工资分解成佰元,伍十元,拾元,五元,壹元,伍角面额的人民币 各是多少张,分别填入相应字段。 SET TALK OFF USE GZ DO WHILE.NOT.EOF() STORE 0 T0 A,B,C,D,E,F A=INT(实发工资/100) REPLOACE佰元WITH A B:实发工资-A*100 C={{U}} [11] {{/U}} IP C>=5 REPLACE{{U}} [12] {{/U}} C=C 5 ENDIF REPLACE拾元WITH C D=B-{{U}} [13] {{/U}} IF INT(D) -5 REPLACE伍元WITH 1 E=INT( D) -5 ENDIF REPLACE{{U}} [14] {{/U}} P=D-INT(D) IF F>=0.5 REPLACE伍角WITH 1 ENDIP {{U}} [15] {{/U}} ENDDO SUM 佰元,伍十元,拾元,五元,壹元,伍角TO A1,B1,C1,D1,E1,F1 ?A1,B1,C1,D1,E1,P1 USE SET TALK ON CANCEL
  • 1、
【正确答案】 1、[11] INT(B/10)    
【答案解析】[12] 伍十元WITH1 [13] INT(B/10)*10 [14] INT WITU IIF(1NT( D) >=5,E,INT( D) ) [15] SKIP