a:= Random(length(Fragen)-1)
liefert einen Wert a im Bereich
0 <= a < (Length(Fragen) - 1)
. Nehmen wir mal an, daß
Length(Fragen) > 1
ist. Was glaubst du, worauf
Fragen[a*5]
dann zugreift, wenn z.B.
a = Length(Fragen) - 2
ist?
Hast du denn kein Range-Checking eingeschaltet?