Tema: RandG
Ver Mensaje Individual
  #2  
Antiguo 01-08-2007
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
  
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.935
Reputación: 27
delphi.com.ar Va por buen camino
¿Estas preguntando como usar un acumulador o quieres calcular el ciclo del algoritmo?

Código Delphi [-]
var
  R: Integer;
begin
  R := 0;
  repeat
    inc(R);
  until Rang > L;
  { Suponiendo que Rang es tu función de RNG }


Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita