保持爲零？

我需要一些幫助，在我的vb.net類。我分配的項目是製作一個平均10個數字的程序。我試圖寫出最好的能力，但我一直得到零。請幫我平均10個號碼。保持爲零？

Module Module1 
Sub Main() 
    Dim One As Integer 
    Dim Two As Integer 
    Dim Three As Integer 
    Dim Four As Integer 
    Dim Five As Integer 
    Dim Six As Integer 
    Dim Seven As Integer 
    Dim Eight As Integer 
    Dim Nine As Integer 
    Dim Ten As Integer 
    Dim A As Integer 
    Dim B As Integer 
    B = One + Two + Three + Four + Five + Six + Seven + Eight + Nine + Ten 
    A = B/2 
    Console.WriteLine("Enter The First Number") 
    One = Console.ReadLine() 
    Console.WriteLine("Enter The Seconed Number") 
    Two = Console.ReadLine() 
    Console.WriteLine("Enter The Third Number") 
    Three = Console.ReadLine() 
    Console.WriteLine("Enter The Fourth Number") 
    Four = Console.ReadLine() 
    Console.WriteLine("Enter The Five Number") 
    Five = Console.ReadLine() 
    Console.WriteLine("Enter The Six Number") 
    Six = Console.ReadLine() 
    Console.WriteLine("Enter The Seven Number") 
    Seven = Console.ReadLine() 
    Console.WriteLine("Enter The Eight Number") 
    Eight = Console.ReadLine() 
    Console.WriteLine("Enter The Nine Number") 
    Nine = Console.ReadLine() 
    Console.WriteLine("Enter The Ten Number") 
    Ten = Console.ReadLine() 
    Console.WriteLine(B) 
    Console.ReadKey() 
End Sub

前端模塊

來源

2015-07-03 Christopher Ruiz

a）您收集他們之前，你不能總結b的值），你有一個算術錯誤 - 10個值的平均值是不是'X/2' – Plutonix

VB，像許多語言，是一個* *程序語言。按照一系列順序指令的順序依次執行語句。您似乎將「B = One + Two + ...」的分配理解爲持久的函數關係，例如，Excel電子表格中的公式。不是這種情況。使用其他輸入變量的當前值（零，因爲您剛剛宣佈它們 - VB很好，並且將它們初始化爲零，而不是所有語言都這樣），所以'B'的值僅在這裏分配一次。 'B'保留這個值，直到你再次分配給它。 –

也沒有代碼打印結果，只是總和 – Plutonix

的問題是，你正在閱讀的用戶輸入剛剛更改爲年底之前將值。

B = One + Two + Three + Four + Five + Six + Seven + Eight + Nine + Ten 
    A = B/2

來源

2015-07-03 22:24:06

您可能想要更改第二行... – Fruitbat

回答

相關問題