Hoy hemos hecho el ejercicio 8 que hay que llamarlo program azar, consiste en introducirle tu nombre y que te diga 6 numeros premiados al azar desde el 1 hasta el 49.
Lo nuevo de este ejercicio es la funcion randomize (sirve para que introduzca numeros al azar), el resto seria igual.
Para introducir numeros aleatorios, hay que poner randomize; antes de empezar a escribir el primer numero al azar, y antes de escribir la variable, hay que poner la operacion:
ejemplo:=random (100) [El numero que va entre parentesis, sirve para que escriba un numero aleatorio que va desde el 0 al 100][ejemplo es la variable]
Nos quedaria asi:
randomize;
num1:=random (49)+1; [Esto es para que vaya desde el 1 hasta el 49]
write ('...');
num2:=random (49)+1;
write ('...');
...
Y asi con todos los numeros que quieras aleatorios.