ich bin gerade dabei mich auf meine mündliche Informatikprüfung vorzubereiten. Als Thema wurde unter anderem Selectionsort genannt (denke mal, ihr wisst damit was anzufangen :
Das Prinzip hab ich total verstanden und auch die Prinzipielle Umsetzung.
Meine Frage ist jetzt nur:
Welcher Quelltext wäre richtig?
Es geht um folgende drei Zeilen:
Code: Alles auswählen
Temp:=Feld[min];
Feld[min]:=Feld[i];
Feld[i]:=Temp;
1)
Code: Alles auswählen
Procedure SelectionSort(var Feld :Array of Integer);
var i, j, Temp, Min: integer;
Begin
For i:=Low(Feld) to High(Feld) do
Begin
Min:=i;
For j:=i+1 to High(Feld) do
begin
IF Feld[j] < Feld[min] then
Min:=j;
end;
Temp:=Feld[min];
Feld[min]:=Feld[i];
Feld[i]:=Temp;
End;
End;
Code: Alles auswählen
Procedure SelectionSort(var Feld :Array of Integer);
var i, j, Temp, Min: integer;
Begin
For i:=Low(Feld) to High(Feld) do
Begin
Min:=i;
For j:=i+1 to High(Feld) do
begin
IF Feld[j] < Feld[min] then
Min:=j;
Temp:=Feld[min];
Feld[min]:=Feld[i];
Feld[i]:=Temp;
end;
End;
End;
Code: Alles auswählen
Procedure SelectionSort(var Feld :Array of Integer);
var i, j, Temp, Min: integer;
Begin
For i:=Low(Feld) to High(Feld) do
Begin
Min:=i;
For j:=i+1 to High(Feld) do
IF Feld[j] < Feld[min] then
begin
Min:=j;
Temp:=Feld[min];
Feld[min]:=Feld[i];
Feld[i]:=Temp;
end;
End;
End;
Code: Alles auswählen
For j:=i+1 to High(Feld) do
begin
IF Feld[j] < Feld[min] then
Min:=j;
end;
Code: Alles auswählen
For j:=i+1 to High(Feld) do
IF Feld[j] < Feld[min] then
Min:=j;

Grüße
Tim