- 1、本文档共5页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
算法:九级累进制个人所得税的算法
任务描述
通过对“九级累进制个人所得税”这个算法的描述以及用VB实现的方法,了解多分支结构的算法特征,以及多分支结构的程序设计方法。
任务分析
依法缴纳个人所得税是每一个公民应尽的义务,国家通过征收个人所得税也是调节贫富差距,实现社会财富再分配,取之民用之于民的重要手段。
我国现阶段采取是九级累制进的个人所得税征收方法。即将个人月收入额减去八百元后,按所剩部分金额的多少将纳率的税率分成九级,并进行累进计算。如下表所示:
个人所得税应纳税额速查表
级数
全月应纳税所得额X(元)
税率
累交税额(元)
应纳税额计算公式
(元)
1
不超过500的部分
5%
0
X*5%
2
超过500至2000的部分
10%
0+500*5%
25+(X-500)*10%
3
超过2000至5000的部分
15%
25+1500*10%
175+(X-2000)*15%
4
超过5000至20000的部分
20%
175+3000*15%
625+(X-5000)*20%
5
超过20000至40000的部分
25%
625+15000*20%
3625+(X-20000)*25%
6
超过40000至60000的部分
30%
3625+20000*25%
8625+(X-40000)*30%
7
超过60000至80000的部分
35%
8625+20000*30%
14625+(X-60000)*35%
8
超过80000至100000的部分
40%
14625+20000*35%
21625+(X-80000)*40%
9
超过100000的部分
45%
21625+20000*40%
29625+(X-10000)*45%
注:本表所称全月应纳税所得额,是指每月收入额减除费用八百元后或减除附加费用后的余额。累交税额为本级之上级数应纳税额的累加。
由上表可知,只要将我们每月的收入减去800元后,就能得到“应纳税所得额”,然后根据“应纳税所得额”所处的级数,按相应的“应纳税额计算公式”就能准确地计算出每个人一个月应该缴纳的个人所得税。
在实际操作过程中,税务部门都是事先编制好计算机程序,只需将月收入输入计算机,计算机就会自动计算出应该缴纳的个人所得税。
在“九级累进制个人所得税”这个算法中,核心的部分是,根据应纳税所得额,用判别语句确定所处的级数,级数确定后,运用计算公式计算应缴的个人所得税就方便多了。
这种算法用流程图来表现,则在流程图中,必定有判别框,因为是九级累进制,所以需要九个类别框来分别确定九个级数。
为了实现这个算法,则需要用VB来编制相应的程序,在VB程序中除了需要用到赋值语句、输入输出语句、其它计算语句外,还必须用到分支语句。
?
活动过程
1、 算法流程图
下面给出用计算机程序实现“九级累进制个人所得税”的一种最容易理解的算法。
结束开始输入A值X=500??YesNoX=A-800Y= X*5%500X=2000??NoY=25+(X-500)*10%Yes。。。。。。输出Y值X10000??NoY=29625+(X-10000)*45%Yes?
结束
开始
输入A值
X=500??
Yes
No
X=A-800
Y= X*5%
500X=2000??
No
Y=25+(X-500)*10%
Yes
。。。。。。
输出Y值
X10000??
No
Y=29625+(X-10000)*45%
Yes
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
?
2、分析流程图
通过流程图可以看出,在这个算法中,我们设置了一系列条件判断,这些条件都是不重复的,即满足了其中一个条件,其它条件就不可能再次满足。如果条件成立就重复一次已经做过的语句,直至条件不成立,只要有重复的过程,这种结构就是循环结构。
3、算法的VB程序实现
算法中用到了一条输入语句、十个分支语句、一个输出语句。其中输入语句和输出语句与顺序结构的例题中的语句一致。
(1)建立窗体和输入、输出、命令按钮控件。
方法与前二节一样。
(2)编写“Command1”触发的程序代码。
在“Private Sub command1_click()”和“End Sub”之间输入以下的程序代码。
Dim a As Single, x As Single, y As Single
a = Text1.Text
x = a - 800
If x = 0 Then
y = 0
End If
If x 0 And x = 500 Then
y = x * 0.05
End If
If x 500 And x = 2000 Then
y = 25 + (x - 500) * 0
您可能关注的文档
- 绥宁县中小学生学籍管理.doc
- 绥师附小学生心理健康调研报告.docx
- 绥阳县观音岩水上乐园(项目规划书).doc
- 绥-阳-县-联-盟-煤-矿简介7.26日.docx
- 绥中县劳动就业培训中心“绥中电焊工”劳务品牌建设材料.doc
- 胎盘早期剥离.doc
- 索尼rx100摄影技巧7.doc
- 腾达(tenda)无线路由猫-d301路由猫模式如何设置?.doc
- 腾飞的苗岭金鹅.doc
- 腾格尔歌曲天堂串词.docx
- 伟大的历史转折建设有中国特色社会主义省公开课一等奖新名师优质课比赛一等奖课件.pptx
- 日本侵华战争的开始中国抗日战争与世界反法西斯战争课件省公开课一等奖新名师优质课比赛一等奖课件.pptx
- 文理分科后第一次班会省公共课一等奖全国赛课获奖课件.pptx
- 爬山虎的脚课件省公开课一等奖新名师优质课比赛一等奖课件.pptx
- 欣赏与设计省公开课一等奖新名师优质课比赛一等奖课件.pptx
- 气体摩尔体积物质的量课件省公开课一等奖新名师优质课比赛一等奖课件.pptx
- 牛津初中英语BUnitAsiaReading市公开课一等奖百校联赛特等奖课件.pptx
- 拍案惊奇说公正省公开课一等奖新名师优质课比赛一等奖课件.pptx
- 湘教版音乐九下长大后我就成了你ppt课件省公开课一等奖新名师优质课比赛一等奖课件.pptx
- 提问是一种艺术是一种技巧在引导幼儿进行美术创作时市公开课一等奖百校联赛特等奖课件.pptx
文档评论(0)