Forum: Object-Pascal / Delphi-Language
Delphi
by Andy5050,
28. Sep 2009
procedure ShellSort(var aSort: array of integer);
var
iI, iJ, iK, iSize: integer; // Deklaration der VARiablen//
wTemp: integer;
begin
iSize := High(aSort); // iSize ist die Menge aller Elemente im Array//
iK := iSize shr 1; // iK ist das mittlere Element//
while iK > 0 do
begin
for iI := 0 to iSize - iK do // iI sind die Werte links von iK//
Forum: Object-Pascal / Delphi-Language
Delphi
by Andy5050,
27. Sep 2009
"x shr 1 macht x/2 ohne Rest "
--> iK := iSize shr 1; das bedeutet also, das iK das mittlere Element bzw. das was links der mitte steht ist und iSize das letzte element ist,oder?
Forum: Object-Pascal / Delphi-Language
Delphi
by Andy5050,
27. Sep 2009
Bei mir ist der Link dead :gruebel:
Forum: Object-Pascal / Delphi-Language
Delphi
by Andy5050,
27. Sep 2009
Ich hab delphi selber nicht... außerdem versteh ich den ganzen Aufbau net, ich hab ja gesagt, ich bin ne Niete im programmieren.. :wall:
Forum: Object-Pascal / Delphi-Language
Delphi
by Andy5050,
27. Sep 2009
Danke für den Tip, das geht aber etwas an meiner Frsge vorbei... Ich muss den Shellsort-kern, den ich hier rein geschrieben habe, (zeilenweise) erklären können. Da ich im Programmieren ne totale Niete bin, bräuchte ich dabei Hilfe z.B: wofür die VARs stehen, was der Befehl "shr" bedeutet usw. Wenn mir dabei jemand helfen könnte...
Forum: Object-Pascal / Delphi-Language
Delphi
by Andy5050,
27. Sep 2009
Tachchen erstmal, ich bin neu hier.
Ich hatte mit einem Freund den Auftrag ein Programm zum Sortieralgo "Shellsort" zu schreiben.
Da das nicht so geklappt hat als geplant, haben wir einen aus dem Netz genommen. (Wurde akzeptiert)
--> Shellsort: Bei Shellsort wird die Reihe der Elemente (z.B: 9 3 2 8 7 5 6 1) in Pakete unterteilt --> 9 3 | 2 8 | 7 5 | 6 1
Diese werden dann (nur um es...