下面是近一年来实发工资计算税金的程序，并将计算结果填入税金字段(假定职工最高实发工资为难2500元)请填空。
****主程序MAIN.PRG****
SET TALK OFF
TAX=O
USE GZ
DO WHILE.NOT.EOF（　）
SHFGZ=实发工资
D0 SUB [8]
9TAX
RAPLACE税金WITH TAX [9]
ENDDO
USE
CANCEL
******子程序SUB.PRG********
[10]
X-O
DO CASE
CASE A>=800.AND.A<=1300
X=(A-800)*0.05
CASE A>1300.AND.A<1800
B=A-1300
CASE A>=1800.AND.A<=2300
B=A-1800
X=B*O 15+500.0.1+500*0.05
CASE A>=2300
B=A-230
X=B*O.2+500*0.15+500*0． 1+500*0.05
ENDCASE
RETURN

题库:计算机等级考试 类型:填空题 时间:2017-07-03 14:42:36 免费下载:《填空》Word试卷

下面是近一年来实发工资计算税金的程序，并将计算结果填入税金字段(假定职工最高实发工资为难2500元)请填空。
****主程序MAIN.PRG****
SET TALK OFF
TAX=O
USE GZ
DO WHILE.NOT.EOF（　）
SHFGZ=实发工资
D0 SUB [8]
9TAX
RAPLACE税金WITH TAX [9]
ENDDO
USE
CANCEL
******子程序SUB.PRG********
[10]
X-O
DO CASE
CASE A>=800.AND.A<=1300
X=(A-800)*0.05
CASE A>1300.AND.A<1800
B=A-1300
CASE A>=1800.AND.A<=2300
B=A-1800
X=B*O 15+500.0.1+500*0.05
CASE A>=2300
B=A-230
X=B*O.2+500*0.15+500*0． 1+500*0.05
ENDCASE
RETURN

本题关键词:工程税金,面积计算工程,竣工结算程序,竣工结算金额,实际工作量计算法,工程造价计算顺序,工程设计发包,实际工资,围填海工程,工程款结算;