@sakura
meine bisherige Lösung ist keine Lösung:
Zahlen: Array [1..100] of String;
procedure TForm4.Button1Click(Sender: TObject);
begin
Zahlen := random(6) + 1;
Memo1.Text := Zahlen;
Ich glaube aber auch nicht wenn es klappen würde Array u. Integer passt nicht zusammen
glaube ich nicht das das Prog mir auch nur eine Zahl anzeigen würde !
while
Zahlen = not 100 do random (6) + 1
do
keine Ahnung
(Ich weiß nicht wie ich dem Programm sagen soll das er 100mal die Zahl ausrechen soll und
sie mir dann alle anzeigt)
@Rakshasa
Du hast tatsächlich recht meine Mathe HA hat mich darauf gebracht da ich 100 mal nen Würfel werfen
musste und mir dann die ganzen Werte notieren müssen (das gleich auch mit eine Münze
hab ich aber schon gemacht)
und da wollte ich doch mal sehen ob man das nicht auch vom Pc ausrechnen lassen könnte.
Is ja auch Zufall
(Aber ich werde meine HA wohl auf die normale Art machen müssen *g*)
Gruß,
DelFreak