请转发到计算机编程模块吧,还有就是你要注明要用那个计算机语言来编,毕竟计算机语言太多了
来个VB6的,VBA也适用
Sub tax()
Dim i As Double
Dim tax As Double
i = InputBox("请输入当月收入")
i = i - 3500
If i < 1500 Then
tax = i * 0.03
ElseIf i < 6000 Then
tax = i * 0.1 - 105
ElseIf i < 15000 Then
tax = i * 0.2 - 555
Else: tax = i * 0.25 - 1005 '这里用到了速算扣除数,且没有朝大的数字上写了,要写请自行添加上吧
End If
MsgBox ("应纳个税为:" & tax)
End Sub