Zum 50:50-Joker: Ziehe doch einfach 2 Zahlen.
Eine für dich leicht nachvollziehbare Lösung könnte grob so aussehen (ungetestet):
Delphi-Quellcode:
// Zahl 1
repeat
Falsch1 := Random(4);
until Falsch1 <> quizrichtig(n, 6);
// Zahl 2
repeat
Falsch2 := Random(4);
until (Falsch2 <> quizrichtig(n, 6)) and (Falsch2 <> Falsch1);
// Falsche Antwort deaktivieren
RadioGroup1.Buttons[Falsch1].Enabled := false;
RadioGroup1.Buttons[Falsch2].Enabled := false;
"Random(3)" liefert übrigens Werte zwischen 0 und 2, und du brauchst welche zwischen 0 und 3 und somit "Random(4)".
Beim Publikumsjoker kannst du zufällig Antworten bewerten, aber die richtige höher als die anderen. Da fällt mir auf Anhieb kein Beispiel ein, aber das kriegst du schon hin.
Grüße, Matze