Ich habe mir das bisher so gedacht (ist noch nicht ganz fertig, will es euch aber nicht vorenthalten):
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i, letztezahl: Integer;
begin
i := random(100);
letztezahl := kA, wie du die letzte Zahl kriegst, da brauch ich auch noch Hilfe
if i = letztezahl then
random(100);
ShowMessage(IntToStr(i));
end;