Gemiddelde berekenen van willekeurige user ingevoerde waardes(Console application)

[Jimbo84]

Weet er iemand hoe ik een programma schrijf waarbij de gebruiker verschillende waardes invult na elkaar via de console? Als men de waarde 0 invoerd zou het programma moeten stoppen en het gemiddelde berekenen, alleen het gemiddelde van de getallen buiten de 0 gerekend.

Ik vermoed dat dit in Do While of Do Until(herhalingen) zou moeten verwerkt worden.


Hetgene ik momenteel heb is:

Module Gemiddelde
    Sub Main()
        Console.WriteLine("Gemiddelde berekenen van de waardes <0 om te stoppen> : ")
        Dim value1 As Integer = Console.ReadLine
        Dim value2 As Integer = Console.ReadLine
        Dim value3 As Integer = Console.ReadLine

        If value3 = 0 Then  'als inputvalue3 0 is wordt het gemiddelde berekend en het programma gestopt
            Dim gemiddelde As Double
            gemiddelde = (value1 + value2 + value3) / 3
            Console.WriteLine("Het gemiddelde van bovenstaande waardes is " & gemiddelde & ".")
        End If
        Console.ReadLine()
    End Sub
End Module

 

[JoZ1]

Zoiets:

[CPP]Console.WriteLine("Gemiddelde berekenen van de waardes <0 om te stoppen> : ")
Dim getallen As New List(Of Double)
Dim input As Integer
Do
input = Console.ReadLine
getallen.Add(input)
Loop Until input = 0

Dim gemiddelde As Double
For Each item As Double In getallen
gemiddelde += item
Next
gemiddelde /= getallen.Count - 1
Console.WriteLine("Het gemiddelde van bovenstaande waardes is: " & gemiddelde & ".")
Console.ReadKey()[/CPP]