Zitat von
Royale:
zufall[x]:=vergleich[x+1]; //tauschen
Du tauscht nicht, du überschreibst.
Kein Wunder also, dass die 3 auf 1-mal 2 mal da ist und die 5 weg.
Benutze eine
Hilfsvariable und mache einen
Dreieckstausch:
Delphi-Quellcode:
hilf:=zufall[x]
zufall[x]:=vergleich[x+1];
vergleich[x+1]:=hilf;
So tauscht du