103 第二題 計算通話費

來恩電信公司推出一個通話計費方案:
    基本費 50 元可打 10 分鐘;
    超過 10 分鐘到 100 分鐘以內的通話時間,每 10 秒 1 元;
    超過 100 分鐘到 200 分鐘以內的通話時間,每 15 秒 1 元;
    超過 200 分鐘到 500 分鐘以內的通話時間,每 20 秒 1 元;
    超過 500 分鐘之後的通話時間,每 30 秒 1 元;

南臺通訊行的小明用 VB 寫了一個程式,可協助客人計算通訊費。
請在表單上建立一個 LABEL、二個 TEXTBOX 及一個按鈕,
其中 LABEL 表示「請輸入通話時間 (以分鐘計)」,
相對應的 TEXTBOX 可輸入一個正整數 (可包含 0),
表示通話時間的分鐘數,另一個 TEXTBOX 則輸出通訊費金額 (通訊費為整數)。
程式執行順序:輸入分鐘數,按下按鈕,輸出通訊費金額。

輸入說明

輸入整數值 n。(0 ≤ n ≤ 1000)

輸出說明

輸出 通話費。

範例
輸入 輸出
0 50
1000 2890
246 1128


分析:
本程式提供兩種寫法,一種是使用陣列驅動,其彈性較大,可以將參數寫在檔案, 利用讀檔,將參數讀到陣列,然後在程式中運用陣列值做計算。適合解維護性大 或常更改參數的問題上。另一種方法,直接 if 判斷。