level 6
楼主好人,我做了个简单的算个人所得税的计算器,但是当我输入的数据大了以后算出来的结果是负数,所以求楼主帮我看下是不是数据类型定义错了,该怎么改,马上要交作业了,急急急急
//稿酬所得
integer x6, x61
x6=long(em_6.text)
if x6<=800 then
x61=x6*0.2*(1 - 0.3)
em_61.text=string(x61)
elseif x6>800 and x6<=4000 then
x61=(x6 - 800)*0.2*(1 - 0.3)
em_61.text=string(x61)
elseif x6>4000 then
x61=x6*(1 - 0.2)*0.2*(1 - 0.3)
em_61.text=string(x61)
else
x61=0
em_61.text=string(x61)
end if
2013年10月14日 14点10分




