Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Befehl für "nicht gleich"


lakado - Mo 02.11.09 23:22
Titel: Befehl für "nicht gleich"
Tag zusammen, bin ein zimlicher Info anfänger und muss morgen nen projekt abgeben und hab ne frage


wenn ich hier ne schleie einbaue und möchte erreichen, dass solange eine neue zufallszahl erstellt wird, bis Zufall1 nicht gleich zufall2 ist, gibt es irgendeinzeichen, dass ich in die klammer zwischen zufall1 und zufall2 setzten kann um das zu erreichen



Delphi-Quelltext
1:
2:
3:
if zufall2=zufall1  then repeat
                          zufall2:=random (49)+1;
                         until (zufall1... zufall2)


schonmal im vorraus danke

gruß lakado

Moderiert von user profile iconKlabautermann: Delphi-Tags eingefügt.


platzwart - Mo 02.11.09 23:29

<> bedeutet ungleich
not(zufall2 = zufall1) um die Aussage zu negieren


Xion - Mo 02.11.09 23:52

in deinem Beispiel ist übrigens die repeat until schleife nicht die beste Lösung

Delphi-Quelltext
1:
2:
while Zufall1=Zufall2 do
  Zufall2:=random(49)+1;


oder

Delphi-Quelltext
1:
2:
3:
repeat
  Zufall2:=random(49)+1;
until Zufall1<>Zufall2

(ohne if)


lakado - Di 03.11.09 00:07

danke, habs jetzt fertig


Delete - Di 03.11.09 00:18

Das heißt übrigens Operator. Ein Befehl ist was anderes. So was sollte eigntlich in der Hilfe und in jeden besseren Delphi Buch zu finden sein.


Boldar - Mo 16.11.09 17:01

und für Lottozahlen(falls es darum geht), muss es bis 48 sein, sowie bietet sich die verwendung von Mengen an.


elundril - Mo 16.11.09 17:11

user profile iconBoldar hat folgendes geschrieben Zum zitierten Posting springen:
und für Lottozahlen(falls es darum geht), muss es bis 48 sein, sowie bietet sich die verwendung von Mengen an.


kommt aufs lottosystem an würd ich sagen. bei uns is es 45. richtet sich ja nach der einwohnerzahl des landes. ;) bei den chinesen kann man zb 45 nicht nehmen sonst hast du bei jeder ziehung 20 leute die alle 6 richtig haben.


Boldar - Mo 16.11.09 17:18

user profile iconelundril hat folgendes geschrieben Zum zitierten Posting springen:

bei den chinesen kann man zb 45 nicht nehmen sonst hast du bei jeder ziehung 20 leute die alle 6 richtig haben.

Na und? Dann gibs halt weniger Gewinn.


Gausi - Mo 16.11.09 17:31

user profile iconBoldar hat folgendes geschrieben Zum zitierten Posting springen:
und für Lottozahlen(falls es darum geht), muss es bis 48 sein, sowie bietet sich die verwendung von Mengen an.


Liefert random(n) nicht eine Zahl größer gleich 0 und echt kleiner n? Dann stimmt doch der Code mit random(49) + 1; für "unser" Lotto :gruebel:.