@Jumpy: warum verwendet man eigentlich einen Integer, wenn man doch einen Bollean haben will?
Zitat:
Liste : Array of Integer;
Nicht man, ich
Das war weil ich zuerst auch die Zahl da speichern wollte, sprich
Delphi-Quellcode:
if Liste[a]<>1 then
begin
Liste[a]:=a;
Inc(i);
end;
Dann beim tippen, viel mir auf, das das doppeltgemoppelt wäre und ich hab die 0/1 Variante gemacht, da ich zu faul war alles auf Boolean zu ändern. Ging ja nur um den Ansatz, das die Position im Array die Zahl repräsentiert.