numeros aleatorios

Ver el tema anterior Ver el tema siguiente Ir abajo

numeros aleatorios

Mensaje  Israfel el Dom Feb 13, 2011 7:43 pm

mostrar un numero que valla del 0 al 50 aleatoriamente.

program condicion5;
uses crt;
var
x:integer;
begin
clrscr;
randomize;
random(50);
Write(x);
readkey;
end.


--------------------------------
program condicion5;
uses crt;
var
x:integer;
begin
clrscr;
randomize; {Comando que hace que randon muestre numeros aleatorios}
random(50); {random mostrara un numero.. (50) se le indica que el numero debe ser hasta el 50 incluyendo el 0 (cero)}
Write(x); {mustra en pantalla}
readkey;
end.

Israfel

Mensajes : 28
Fecha de inscripción : 12/02/2011
Edad : 27

Ver perfil de usuario

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.