用autoIt寫乙個計算稅收的程式

2021-07-24 04:47:10 字數 1785 閱讀 8659

看了一兩個小時教程,發現這個指令碼語言很簡單,適合程式設計基礎薄弱的人。其實,我更想說的是,也許,我適合編寫軟體。ye

**:dim $k=3500

dim $m,$s

$m=inputbox("稅收計算","請輸入你的月工資收入:")

if @error=1 then exit

if $m="" then exit

if $m<=3500 then

$s=0

else

if 3500<=$m<5000 then

$s=($m-3500)*0.03

else

if 5000<=$m<8000 then

$s=($m-3500)*0.1-105

else

if 8000<=$m<13500 then

$s=($m-3500)*0.2-555

else

if 13500<=$m<38500 then

$s=($m-3500)*0.25-1005

else

if 38500<=$m<58500 then

$s=($m-3500)*0.3-2775

else

if 58500<=$m<83500 then

$s=($m-3500)*0.35-5500

else

if $m>=83500 then

$s=($m-3500)*0.45-13505

endif

endif

endif

endif

endif

endif

endif

endif

msgbox(0,"應繳納稅收",$s)

為這個程式默哀一下,生的錯誤,死的光榮-------

計算稅收結果有錯誤。歡迎稅收部門使用

正確版本**:

dim $k=3500

dim $m,$s

$m=inputbox("稅收計算","請輸入你的月工資收入:")

if @error=1 then exit

if $m="" then exit

if $m>=83500 then

$s=(($m-3500)*(0.45)-13505)

else

if $m<83500 then

$s=(($m-3500)*(0.35)-5500)

else

if $m<58500 then

$s=(($m-3500)*(0.3)-2775)

else

if $m<38500 then

$s=(($m-3500)*(0.25)-1005)

else

if $m<13500 then

$s=(($m-3500)*(0.2)-555)

else

if $m<8000 then

$s=(($m-3500)*(0.1)-105)

else

if $m<5000 then

$s=(($m-3500)*(0.03))

else

if $m<=3500 then

$s=0

endif

endif

endif

endif

endif

endif

endif

endif

msgbox(0,"應繳納稅收:",$s)

用python寫的乙個簡單的計算器

用python完成的乙個簡單的計算器,能算簡單的 運算,暫不支援鍵盤輸入,以後會慢慢加些附加的功能,讓它變得強大些 from tkinter import def frame root,side w frame root w.pack side side,expand yes,fill both r...

用golang寫乙個proxy

我複雜的網路環境中,proxy是個很有用的工具,我們可以通過proxy 幫我們完成網路流量的 這個proxy得先能接收請求,所以這裡先啟動乙個tcp的監聽,獲取請求 func s server start glog.infof proxy listen in s,waiting for connec...

用python寫乙個restful API

coding utf 8 package.module python實現的圖書的乙個restful api.restful api 一般模式 get select 從伺服器取出資源 一項或多項 post create 在伺服器新建乙個資源。put update 在伺服器更新資源 客戶端提供改變後的完...