Generazione di numeri casuali è stato incluso come parte del linguaggio di programmazione Ada , quando Ada 95 è stato introdotto . Esso può essere utilizzato per generare un numero intero casuale da una gamma determinata di numeri . Interi casuali possono essere usati per giochi di dadi, lanci di moneta e nomi disegno da un cappello , per esempio. Istruzioni
1

Aprire il file di programma che conterrà la funzione intero casuale . Nella prima riga della funzione, digitare " dichiarare" per iniziare la definizione delle variabili
2

Definire il tipo di funzione

Esempio : . ». Tipo Rand_Draw è compreso tra 1 .. 100; "
3

Chiama il generatore casuale dalla libreria

Esempio : . " pacchetto Rand_Int è nuovo Ada.Numerics.Discrete_Random ( Rand_Draw ) ; < br >
4

Definire il seme e il numero

Esempio : seme : Rand_Int.Generator ; Num.: . Rand_Draw ;
5

Tipo " preliminari" a un nuovo linea per iniziare il calcolo parte della funzione .
6

Ripristinare il seme per migliorare la randomizzazione . Ciò è particolarmente utile se si sarà raccogliendo più di un numero dello stesso intervallo di numeri .

Esempio : " Rand_Int.Reset ( seme ) ; "
7

indicare al programma di scegliere il numero

Esempio: " Num : = Rand_Int.Random ( seme ) . ;
8

istruire il programma per dirvi quale numero ha scelto :

Esempio : Put_Line ( Rand_Range'Image ( Num ) ) ;
9 < p > tipo " finale; " . per terminare la funzione