zufall, mit eingeschränkten werten ?

[Steve]

Hi,

mal davon ausgehend, dass die "Hunderter" zwischen 1 und 4 liegen dürfen, die "Zehner" ebenfalls von 1 bis 4 gehen und die "Einer" nur die Werte 2, 3 und 4 annehmen dürfen:

Delphi-Quellcode:

function zufall : integer;
begin
  result := RandomRange(1,4)*100+  // 1 bis 4
            RandomRange(1,4)* 10+  // 1 bis 4
            RandomRange(2,4);      // 2 bis 4
end;

Falls die Grenzen nicht sitmmen, kannst Du sie ja anpassen

Ist im Endhinein zwar fast das Gleiche wie schon erwähnt, aber die Antwort ist wohl vermutlich -wie bereits erwähnt- im ganzen Tumult untergegangen..

Gruß
Stephan

//edit: Tippfehler