[数值计算] 批处理版工资个人所得税计算器

@echo off
::code by foxjl - bbs.bathome.net
setlocal enabledelayedexpansion
set x500=5 0
set x2000=10 25
set x5000=15 125
set x20000=20 375
set x40000=25 1375
set x60000=30 3375
set x80000=35 6375
set x100000=40 10375
set y100000=45 15375
set /p num=输入不包含保险金额的月薪(工资小于1600不用交纳个人所得税):
set /a ynum=num-1600
for %%i in (500 2000 5000 20000 40000 60000 80000 100000) do (
	if %ynum% leq %%i (call :calc !x%%i!)
		if %ynum% gtr 100000 (call :calc !y100000!)
	)
:calc
set /a tax=((ynum)*%1)-(%2*100)
echo %num%元工资应交的个人所得税是:%tax:~0,-2%.%tax:~-2%元.
pause>nul&exit
复制代码