Array / Alle Kombinationsmöglichkeiten ausprobieren

[Maximus]

Hallo,

Hab ich das richtig verstanden? Du willst diese Array mit allen Kombinatiosnmöglichekeiten, also 91, 19, 87, 78 usw. füllen?

Dann müsste deine Array aber ein wenig größer sein. Den es sind 9^9 2-stellige Kombinationen möglich.

Und dann kannst eventuell so durchgehen:

Delphi-Quellcode:

var X,Y: Integer;

for X := 1 to ArrayGröße do
  for Y := 1 to ArrayGröße do
   Feld[X, Y] := StrToInt(IntToStr(X) + IntToStr(Y));

MFG
Maximus