薪俸稅(累進稅率) Salaries tax (Progressive rate)
程式編寫日期: 2008年12月9日
注意: E 是按 EXP。
程式 (46 bytes)
Mem clear: ?→A: Lbl 0: ?→B: ?→C:
B => A>B => BC ÷ E2 M+ => A - B→A => Goto 0:
M + AC ÷ E2
註1: 若果想保留一些記憶用作儲存臨時數據，可將程式中"Mem clear"改為"MM-"，而程式所使用的記憶為A，B，C及M。
註2: 應課稅入息實額，即應評稅入息減去扣除及免稅額。
例題1: 一位文員一年應課稅入息實額為 $75 000，請按下表資料計算他的薪俸稅。
| 應課稅入息實額 | 稅率 | |
| 首 | 40000 | 2% |
| 另 | 40000 | 7% |
| 另 | 40000 | 12% |
| 餘額 | 17% |
按 Prog 1 再按 75000 EXE (應課稅入息實額)
40000 EXE (首4萬) 2 EXE (稅率)
EXE (可不用輸入另4萬，因為已是4萬) 7 EXE (稅率，程式計算完結，顯示薪俸稅為 $3250)
例題2: 一位律師一年的淨收入為 $1500 000，而免稅額為 $200 000，請按下表資料計算他的薪俸稅。。
| 應課稅入息實額 | 稅率 | |
| 首 | 30000 | 2% |
| 另 | 40000 | 7% |
| 另 | 40000 | 12% |
| 餘額 | 17% |
注意: 應課稅入息實額，即應評稅入息減去扣除及免稅額。
按 Prog 1 再按 1500 000 - 200 000 EXE (應課稅入息實額)
30000 EXE (首3萬) 2 EXE (稅率)
40000 EXE (另4萬) 8 EXE (稅率)
EXE (可不用輸入另4萬，因為已是4萬) 14 EXE (稅率)
0 EXE (輸入0代表餘額) 20 EXE (稅率，顯示薪俸稅為 $247 400)
參考資料:
香港薪俸稅及個人入息課稅 (包括不同年份)
http://www.gov.hk/tc/residents/taxes/taxfiling/taxrates/salariesrates.htm
計算香港香港薪俸稅及個人入息課稅 (包括不同年份)
http://www.gov.hk/tc/residents/taxes/etax/services/tax_computation.htm