車輛油耗，需要能即時計算並呈現結果。如果可以即時記錄平均油耗，可以讓車主容易掌
控車輛的情形，提早發現問題，將是一個不錯的功能。
請設計一個程式，可以即時計算平均油耗。假設車輛每 1 分鐘會自動產生一組代表該分
鐘的油耗數據 Xn，單位是公升/公里，其中 n = 1,2,3, ⋯，請讓程式可以不停地輸入新的油耗
數據，並立即顯示出長時平均油耗，其中油耗數據精確度，以四捨五入到小數點後 2 位。
提示：
其中
代表第 n 次輸入 Xn 油耗數據後的平均油耗。 輸入說明
可以連續輸入油耗數據 Xn，其中油耗數據精確度到小數後 2 位，當輸入 0，則代表要
讓程式結束；數字間以空格隔開。
輸出說明
每次數入一筆油耗數據，會即時顯示開始至今的油耗平均值，精確度以四捨五入到
小數後 2 位；數字間以空格隔開。
範例
| 輸入 | 輸出 |
|---|---|
| 12.34 11.56 13.45 0 | 12.34 11.95 12.45 |
| 15.60 18.91 16.73 14.37 0 | 15.60 17.26 17.08 16.40 |
家豪版
Dim x() As String, n As Integer, xn As Double,
Dim xn_1 As Double, xnb As Double, xn_1b As Double
x = TextBox1.Text.Split(" ")
n = 0 : xn_1b = 0 : TextBox2.Text = ""
Do While (x(n) <> "0")
xn = Convert.ToDouble(x(n))
n += 1
xnb = (n - 1) / n * (xn_1b) + xn / n
TextBox2.Text &= Format(CInt(xnb * 100) / 100, ".00") & " "
xn_1b = xnb
xn_1 = xn
Loop
昊朋版
黃翰版