Einzelnen Beitrag anzeigen

Benutzerbild von igel457
igel457

Registriert seit: 31. Aug 2005
1.622 Beiträge
 
FreePascal / Lazarus
 
#3

Re: aus Randomwertebereich Zahlen ausschließen???

  Alt 20. Nov 2005, 20:22
Ungefähr so:

Delphi-Quellcode:
var inArea:boolean;
begin
  inArea := false;
  while not inArea do
  begin
   la := random(100);
   if not ((la = 10) or (la = 55)) then inarea := true else inarea := false;
  end;
end;
Hoffe das ist was du meinst...
Andreas
"Sollen sich auch alle schämen, die gedankenlos sich der Wunder der Wissenschaft und Technik bedienen, und nicht mehr davon geistig erfasst haben als die Kuh von der Botanik der Pflanzen, die sie mit Wohlbehagen frisst." - Albert Einstein
  Mit Zitat antworten Zitat