Zitat von
Dipl Phys Ernst Winter:
Fehler in deinem Code:
a:= random(49)+1;
gibt eine Zahl im Bereich 1..50 zurück!
Gibt eine Zahl 1..49 zurück
vgl.
function Random [ ( Range: Integer) ];
Beschreibung:
Random gibt eine Zufallszahl im Bereich 0 <= X < Range zurück