Pascal/Turbo Pascal - Función de azar

 
Vista:

Función de azar

Publicado por benjamin (10 intervenciones) el 15/02/2001 00:16:24
quiero sabes como hacer para que salgan numeros al azar, por ejemplo, estoy haciendo un juego de la vivorita que come manzanas pero como hago para que ne la pantalla cada vez aparesca en diferentes oordenadas (80,25) al azar?
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:Función de azar

Publicado por Cris (29 intervenciones) el 15/02/2001 10:16:56
Puedes usar random(numero)
random te devuelve un numero al azar que este entre el 0 y el numero que mandas como parametro
por ejemplo:

var x:word;

begin
randomize;
clrscr;
x:=random(10); {del 0 al 10}
writeln(x);
end.

Por lo tanto, tu pantalla es de 80x25, 80 en X y 25 en Y, asi que puedes usar dos variables:

var x,y:word;

begin
randomize;
clrscr;
x:=random(80);
y:=random(25);
gotoxy(x,y);
write('0');
end.

Espero te haya servido.
Saludos
Cristina
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