Pascal/Turbo Pascal - aleatorios

 
Vista:

aleatorios

Publicado por LUIS NAVIDAD (1 intervención) el 25/06/2006 04:06:30
hola, disculpen las molestias, estoy aprendiendo pascal, y no se como pueso originar un numero aleatorio, con el cual pueda despues realizar una operacion matematica.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:aleatorios

Publicado por Diego Romero (996 intervenciones) el 25/06/2006 14:11:25
Se usa un procedimiento y una función.

Randomize;

Esto inicia la semilla de números aleatorios tomado del reloj de la computadora, lo llamas una sola vez al inicio del programa.

Luego usas, por ejemplo

Numero:=Random(100);

Esto genera un número aleatorio entre 0 y 99, si quieres un número entre 1 y 100 debes hacer:

Numero:=Random(100)+1;

Si no llamas Randomize, Random() generará siempre la misma secuencia de números. Un ejemplo práctico:

uses crt;
begin
Randomize;
repeat
WriteLn(Random(100));
until KeyPressed;
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar