Lotto simulation

[montgrimpulo <aghte@hotlinemail.com>]

Hi,

this is a placeholder of the task which I am trying to solve in Ada.
As you may know in German Lotto there are 49 numbers 1..49 
from which you have to select 6 numbers to place a bet.

First Round:
By defining a subtype valid for positive numbers from 1 .. 49,
the use of Ada.Discrete_Random, and the definition of an appropriate Generator
you may get a random number in the range of 1 .. 49.

Second Round:
Here does my problem start. Now I have a set of numbers where
one number - which was randomly selected in the first round -
is missing. How do I use the random function to select another 
random number out of the rest ?

Third to the Six's Round:
same problem.

Any ideas to answer that question ?

A workaround would be
to test in each round, if that number has already been selected.
However, the probability would not be the same as with a reduced
set as the selection would be always from the full set.