Bubble Sort

Potreban mi je Bubble Sort kod u Pascalu. Hvala unapred.

1 Like
Begin
	For i := 0 to n - 1 do
		For j := 0 to  n-i-1 do
			If (niz[j] > niz[j+1]) Then
			Begin
				temp := niz[j];
				niz[j] := niz[j+1];
				niz[j+1] := temp;
			End;

End.
  • n - je duzina niza

Ako zelis opadajuci niz zameni “>” sa “<”

Hvala puno. Ja sam radio na drugačiji način, prof nam je rekao da pogledamo ovaj način, ali na netu su većina u C-u. :slightly_smiling_face: