Hallo.
auf dem Weg zur Programmierung des folgeneden programms (das eig. am ende den ggT) berechnen soll bin ich schon sehr früh auf ein problem gestoßen:
Module Module1
Sub Main()
Console.WriteLine("Willkommen zur ggT-Berchnung")
Console.WriteLine("Bitte geben sie einen Wert an!")
Dim a As Integer = Convert.ToInt16(Console.ReadLine)
Console.WriteLine("Und bitte noch einen weiteren anderen!")
Dim b As Integer = Convert.ToInt16(Console.ReadLine)
Dim x As Integer
Dim y As Integer
If a > b Then
a = x
b = y
ElseIf a < b Then
a = y
b = x
End If
Console.WriteLine("Der größere Wert ist " + x.ToString)
Console.WriteLine("Der kleinere Wert ist " + y.ToString)
Console.ReadLine()
End Sub
End Module
was ich hiermit wollte war die sortierung der werte a und b nach größe, der größere wert soll x und der kleinere y heissen . kann mir einer helfen, sagen was schief gelaufen ist, warum visual basic die neue definition von x und y nicht akzeptiert wenn man das programm debuggt sondern für x und y einfach 0 einsetzt, und mir die richtige lösung zeigen? vielen dank,
Jakob F.
