[aragorneuf]

Pues esto fue lo que hice:

var
Primo: Boolean;
cols, reng, numero, Buscando: integer;
begin
randomize;
Buscando:= StrToInt(E_1.text);
for cols:=0 to 9 do
  for reng:=0 to 9 do
	begin
	  Primo:= True;
	  Numero:=random(101);
	  SG_1.Cells[Cols,Reng] := IntToStr(Numero);
	  If numero = Buscando then
	  M_1.Lines.Add(IntToStr(Cols) + ',' + IntToStr(Reng));
	  end;
	end;
end.