also das delphiprob ist das hier :/

procedure mischen;
var pos1,pos2:integer;
speicher:string;
KarteZahl: Array[1..35] of string;

begin
pos1 := random(35);
pos2 := random(35);
speicher := karteZahl[pos1];
karteZahl[pos1] := KarteZahl[pos2];
KarteZahl[pos2] := speicher;

end;

naja leicht umgeschrieben
soll sowas wie n mischprogramm sein (jaja die shcleife fehlt ^^)
das programm mag nicht dass als pos1 udn pos2 als passende Karte da sind :/ wenn da fetse werte sien würden gehts wieder sonst gibts einfahc nur ne Fehlermeldung

[merke grad, dass hier viele rechtschreibfehler sind LALA]