Jump to content


Foto

como usar um random (delphi) ?



Existem 7 respostas neste tópico

#1 T4YMIND    

T4YMIND
  • Participante
  • 13 mensagens

Publicado 18 September 2004 - 09:27 PM

to precisando gerar numeros aleatoriamente de uns 20 digitos em delphi
como fazer? tem alguma função no delphi para isso?
Valeu ae pela ajuta 'http://www.babooforum.com.br/idealbb/images/smilies/3.gif

PUBLICIDADE  
 

#2 Goofy    

Goofy
  • Participante
  • 440 mensagens

Publicado 19 September 2004 - 01:03 AM

Você poderá fazer o seguinte:



Randomize;
For I := 1 To 20 Do
Numero[I] := Random(100);




Nesse exemplo serão gerados 20 números aleatórios entre 0 até 100.



#3 T4YMIND    

T4YMIND
  • Participante
  • 13 mensagens

Publicado 19 September 2004 - 10:51 AM

Brigadao ae Goofy 'http://www.babooforum.com.br/idealbb/images/smilies/4.gif

e se eu querer gerar numeros de 4 at 5 algarismos (ex: 0000 ..ate.. 99999)
teria como colocar essas opçoes?


#4 Goofy    

Goofy
  • Participante
  • 440 mensagens

Publicado 19 September 2004 - 10:27 PM

Data: 19/9/2004 10:51:39 AM
Autor: T4YMIND
Brigadao ae Goofy 'http://www.babooforum.com.br/idealbb/images/smilies/4.gif

e se eu querer gerar numeros de 4 at 5 algarismos (ex: 0000 ..ate.. 99999)
teria como colocar essas opçoes?

Olha, se tiver alguma forma de fazer isso não dá para fazer com a função Random, pois ela so retorna valores desse forma 0 <= X < (o numero que você escolheu). Portanto me desculpe, mas eu não sei te dizer como faz isso'http://www.babooforum.com.br/idealbb/images/smilies/12.gif

Um Abraço! T+'http://www.babooforum.com.br/idealbb/images/smilies/4.gif

#5 T4YMIND    

T4YMIND
  • Participante
  • 13 mensagens

Publicado 20 September 2004 - 09:56 PM

Data: 19/9/2004 10:27:37 PM
Autor: Goofy

... Portanto me desculpe, mas eu não sei te dizer como faz isso ...

Valeu ae mais uma vez, Goofy... e meu.. nem precisa de desculpa 'http://www.babooforum.com.br/idealbb/images/smilies/2.gif


bom.. galera se alguém souber como gerar numeros aleatorios com opção de escolher a quantidade de digitos (ex: de 4 at 6 digitos 0000 at 999999)
no DELPHI, postem ai... 'http://www.babooforum.com.br/idealbb/images/smilies/16.gif



#6 miraidensetsu    

miraidensetsu
  • Participante
  • 125 mensagens

Publicado 20 September 2004 - 09:59 PM

randomize;
for i := 1 to 20 do begin

while numero[i] < 1000 begin
  numero[i] := random(100000);

  end;

end;

 

{ Esse trecho vai fazer o mesmo que o outro. A diferença é que qualquer número que seja menor que 1.000 será descartado }


#7 T4YMIND    

T4YMIND
  • Participante
  • 13 mensagens

Publicado 22 September 2004 - 12:00 PM

opa.. Valeu ae pela colaboração miraidensetsu

agora está dando para manipular melhor a faixa de numeros que pretendo obter 'http://www.babooforum.com.br/idealbb/images/smilies/16.gif

#8 cased2    

cased2
  • Participante
  • 3 mensagens

Publicado 20 May 2007 - 09:21 PM

Data: 9/20/2004 9:59:19 PM

Autor: miraidensetsu



randomize;
for i := 1 to 20 do begin
&nbsp; &nbsp; while numero[i] &lt; 1000 begin
&nbsp; &nbsp; &nbsp; &nbsp; numero[i] := random(100000);
&nbsp; &nbsp; end;
end;
{ Esse trecho vai fazer o mesmo que o outro. A diferença é que qualquer número que seja menor que 1.000 será descartado }


TEm como fazer um codigo que gera  15 numeros de 1 a 25 por linha onde escolhe quantas linhas quer gerar e possa tirar um número a escolha da pessoa a usar tipo assim

http://img524.images...image=11eg0.gif





PUBLICIDADE