SORTEIO... Não repetir !
Como fazer um sorteio de número ?
O número não pode repetir... e tenque ser ALEATORIO... não pode ser programado !
Rodrigo!
O número não pode repetir... e tenque ser ALEATORIO... não pode ser programado !
Rodrigo!
Ropesca
Curtidas 0
Respostas
Eduqsb
16/07/2003
var num: integer;
begin
Randomize;
num := Random(10000);
intervalo
end;
Abraços,
Luis Eduardo
begin
Randomize;
num := Random(10000);
intervalo
end;
Abraços,
Luis Eduardo
GOSTEI 0
Skywalker
16/07/2003
tente esta funcao
randomize;
while (num1 = num2) and (num2 = num3) and (num1 = num3) do
begin
num1:= random(umvalorqualquer);
num2:= random(umvalorqualquer);
num3:= random(umvalorqualquer);
end;
randomize;
while (num1 = num2) and (num2 = num3) and (num1 = num3) do
begin
num1:= random(umvalorqualquer);
num2:= random(umvalorqualquer);
num3:= random(umvalorqualquer);
end;
GOSTEI 0