[求助]个人所得税题目的lingo程序求助

沙之雪 发表于 2008-5-30 20:13

1. 1. 1. 月应纳税所得额=月工薪收入-费用扣除标准（1600）<table style="MARGIN-LEFT: 45.65pt; BORDER-COLLAPSE: collapse; mso-table-layout-alt: fixed;"><tbody><tr style="HEIGHT: 18pt;"><td valign="middle" width="433" colspan="3" style="BORDER-RIGHT: rgb(255,255,255) 31.875pt; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 324.8pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超额累进税率</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">级数</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">月应纳税所得额</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">税率（％）</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">1</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">不超过500元部分</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">5</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">2</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超过500元至2000元的部分</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">10</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">3</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超过2000元至5000元的部分</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">15</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">4</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超过5000元至20000元的部分</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">20</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">5</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超过20000元至40000元的部分</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">25</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">6</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超过40000元至60000元的部</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">30</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">7</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超过60000元至80000元的部分</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">35</td></tr><tr style="HEIGHT: 18pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">8</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超过80000元至100000元的部分</td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">40</td></tr><tr style="HEIGHT: 20.7pt;"><td valign="bottom" width="40" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(0,0,0) 0.5pt solid; WIDTH: 30.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">9</td><td valign="bottom" width="291" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 218.5pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">超过100000元的部分 </td><td valign="bottom" width="100" style="BORDER-RIGHT: rgb(0,0,0) 0.5pt solid; PADDING-RIGHT: 5.4pt; BORDER-TOP: rgb(255,255,255) 31.875pt; PADDING-LEFT: 5.4pt; PADDING-BOTTOM: 0pt; BORDER-LEFT: rgb(255,255,255) 31.875pt; WIDTH: 75.65pt; PADDING-TOP: 0pt; BORDER-BOTTOM: rgb(0,0,0) 0.5pt solid;">45</td></tr></tbody></table>例如： 
如某人月工薪收入为3500元，则月应纳税所得额=3500-1600=1900元,当月应交个人所得税=500?%+（1900-500）?0%=165元。2. 将雇员个人当月内取得的全年一次性奖金，按所确定的适用税率计算征税。例如：某公司某职员年终奖是6000元，按国税发9号文的规定公式，计算如下：平均月收入＝6000/12＝500元，则适用税率是5%。应缴纳个人所得税＝6000?%=300元；而如果职员年终奖是6001元，按国税发9号文的规定公式，计算如下：平均月收入＝6001/12＝500.0833元，则适用税率是10%。应缴纳个人所得税＝6000?0%=600元；注：年终一次性奖金纳税计算与每月收入纳税计算独立进行。第一小题：请根据以上方案，假某公司某职员年总收入为10万元，公司允许其自行决定每月收入及年终奖的分配数额。为他设计一个方案是其每年纳税总额最少。 
分析：1.每月工资相等；题目我已经分析出来了，就是程序写不好，不会写； 
附件是lingo程序，我编了但是不知道错在什么地方，希望高手指教~~~~~~~~~~~~~~~~~~~~ 
 
[此贴子已经被作者于2008-5-30 20:30:10编辑过]

沙之雪 发表于 2008-5-30 20:24

程序贴出来了 sets: month/x1..x100/:a; year(month):b; links(month,year):f; endsets @bin(x); @for(links(i,j):12*a+b=100000);!说明这是有用的;@for(month:x+y=10000);!说明这是有用的;k=@min(links:f);fx=@if(x#le#1600,0, @if(x#le#2100,((X-1600)*0.05)*12, @if(x#le#3600,((X-2100)*0.1+500*0.05)*12, @if(x#le#3600,((X-2100)*0.1+500*0.05)*12, @if(x#le#6600,((x-3600)*0.15+1500*0.1+500*0.05)*12, @if(X#le#21600,((X-6600)*0.20+3000*0.15+1500*0.1+500*0.05)*12, @IF(x#le#41600,((x-21600)*0.25+20000*0.20+3000*0.15+1500*0.1+500*0.05)*12, @if(x#le#61600,((x-41600)*0.30+20000*0.25+20000*0.20+3000*0.15+1500*0.1+500*0.05)*12, @if(x#le#81600,((x-61600)*0.35+20000*0.30+20000*0.25+20000*0.20+3000*0.15+1500*0.1+500*0.05)*12, @if(x#le#100000,((x-81600)*0.40+20000*0.35+20000*0.30+20000*0.25+20000*0.20+3000*0.15+1500*0.1+500*0.05)*12, ((x-100000)*0.45+18400*0.40+20000*0.35+20000*0.30+20000*0.25+20000*0.20+3000*0.15+1500*0.1+500*0.05)*12 ))))))))))+ @if(y#le#6000,y*0.05, @if(y#le#24000,y*0.1, @if(y#le#60000,y*0.15, @if(y#le#240000,y*0.2,y*0.25)))); end如果x10写成10w的话，一运行就超出内存，就取了个x10,y本来是表示年终将的，无奈，不知道该怎么加了，请教高手。题目不难只是第一小题，但是程序把我难住了 
[此贴子已经被作者于2008-5-30 20:27:50编辑过]

小宛发表于 2012-4-23 21:50

请问你已经解决了吗，正确的是什么啊？

页: [1]

数学建模社区-数学中国's Archiver

[求助]个人所得税题目的lingo程序求助