Bubble sort

download code link:http://www.a1vbcode.com/app-4353.asp
http://en.wikipedia.org/wiki/Bubble_sort

vb.net:
Dim n, i, J, c As Integer
Dim count As Integer
Dim temp As Integer
Dim arrayelement(2) As Integer
count = 1
c = 0
n = InputBox("Enter the Nos of Elemets for sorting")
lblelements.Text = n
ReDim arrayelement(n)
For i = 0 To n - 1
If vbYes = MsgBoxResult.Yes Then
arrayelement(i) = InputBox("Enter the Elements")
Else
Me.Close()
End If
Next
For J = 1 To n
For i = 1 To n
If arrayelement(i - 1) >= arrayelement(i) Then
temp = arrayelement(i - 1)
arrayelement(i - 1) = arrayelement(i)
arrayelement(i) = temp

End If
Next
Next

c# .net:
int n = 0;
int i = 0;
int J = 0;
int c = 0;
int count = 0;
int temp = 0;
int[] arrayelement = new int[5];
count = 1;
c = 0;

arrayelement[0] = 9;
arrayelement[1] = 2;
arrayelement[2] = 6;
arrayelement[3] = 2;
arrayelement[4] = 0;


for (J = 1; J <= 4; J++)
{
for (i = 1; i <= 4; i++)
{
if (arrayelement[i - 1] >= arrayelement[i])
{
temp = arrayelement[i - 1];
arrayelement[i - 1] = arrayelement[i];
arrayelement[i] = temp;

}
}
}


}

No comments:

Post a Comment