Forum: Object-Pascal / Delphi-Language
Delphi
by Wolfgang Mix,
3. Nov 2009
Noch eine Idee, war hier schon einmal:
1. Erzeuge eine Liste aller Zahlen im Interval
2. Ziehe eine beliebige Zahl aus der Liste, zeige sie an.
3. Lösche(!) nun dieses Element aus der Liste.
4. Führe die Schritte 2..4 insgesamt 6x aus
Fertig. Das ist genau das, was man beim Lotto (z.B.) macht.
oder mein Gedanke:
Erzeuge ein Array of integer von 1..49 und schreibe dort z.B. überall...
Forum: Object-Pascal / Delphi-Language
Delphi
by Wolfgang Mix,
2. Nov 2009
Naja, dann ist Result ja mehr als Blödsinn
Forum: Object-Pascal / Delphi-Language
Delphi
by Wolfgang Mix,
2. Nov 2009
@isilive
Es beantwortet zwar nicht ganz Deine Frage, aber für Integerwerte für 6 aus 49 ist die
Normalverteilung recht gut, was man mit dem angehängten Programm testen kann.
Gruß
Wolfgang
Forum: Object-Pascal / Delphi-Language
Delphi
by Wolfgang Mix,
2. Nov 2009
@himitsu
Ich glaube, Du hast Dich vertppt. Es sollte wohl random(49) + 1 = 1..49 heißen
... und damit ist dann auch die Abfrage auf Null überflüssig
Gruß