Zufallszahl erzeugen und den Wert in Label anzeigen

[turboPASCAL]

Hi,

Erster Fehler:
label1.caption := round(random*3); Du weist einem String einen Integer zu, also inkompatibele Typen.

Richtig währe es einem String einen Stringtypen zu zuweisen:
label1.caption := IntToStr( round(random*3) ); Nun zu dienem "zahl zwischen 1 und 3"-Problem, random(X)
gibt eine zahl zwischen Null und kleiner X zurück.

Richtig müsste es demnach heissen:
label1.caption := IntToStr( 1 + random(3) );