Italian community of Lazarus and Free Pascal

Randomize;

Dado:=Random(5)+1;

writeln('Il dado restituisce il valore: ', Dado);

Analizzando il codice vediamo che per prima cosa inizializziamo il generatore di numeri casuali, per secondo generiamo un numero casuale da 0 a 5 e poi lo incrementiamo di uno, per finire stampiamo il risultato a monitor. Ovviamente se dovevamo generare un numero che partisse da uno e arrivasse a 6 dovevamo per forza eliminare l'opzione 0 dai possibili risultati e parametrizzando random con 6 ciò non sarebbe stato possibile.