Дзюндзя (![[info]](http://l-stat.livejournal.com/img/userinfo.gif){kind=small} syarzhuk) wrote,@ 2004-05-04 12:17:00 |
|
Камэнтую ўласны код
//This class supports sampling without return
//The user has to create it specifying the Size
//GiveARandomNumber function will return
//random non-repeating integer numbers
//between 1 and Size
//until Reset is called
//life is just a sequence of random non-repeating meaningless numbers
TSampleWithoutReturn = class(TObject)
...
