Nachtrag:
Wenn du mit der RANDOM() funktion Zahlen zwischen 1-6 haben willst, solltest du das nach dem RANDOM() auch kontrollieren.
(Wegen dem Wort Würfel)
so wäre mein aufruf
GoZahl:=random(6); // <- hier könnte das ergebniss 0 sein aber ich lass dein +1 weg damit nur nach <1 geprüft werden brauch
if GoZahl < 1 then GoZahl := 1;
oder alternativ
GoZahl:=random(5); // hier kann 0-5 rauskommen
Inc(GoZahl, 1); // also geben wir hier noch einen rauf
das ist nur ein Vorschlag.
Grüße