Wie wäre es mit SchnickSchnackSchnuck. Der Computer dekt sich was aus und man selbst kann wählen. ^^
Edit:
Delphi-Quellcode:
Randomize;
//...
var
i,j: Integer;
begin
i := random(6)[COLOR="Red"]+1[/COLOR]; //speichert in i eine von 6 möglichen Zufallszahlen, also eine Zahl zwischen (inkl.) [COLOR="#ff0000"]1[/COLOR] und 6
j := random(6)+1; //speichert in j eine Zahl zwischen 1 und 6
//...
Ja, und diese beiden Werte dann vergleichen.