Выбор s случайных элементов из r оставшихся, Случайный выбор нескольких несовпадающих значений из множества

Задача: Случайный выбор нескольких несовпадающих значений из множества
Псевдокод: Выбор s случайных элементов из r оставшихся

select = m
remaining = n
for i = 0 to n-1
  if (bigrand() % remaining) < select
    print i
    select--
  remaining--

select = m
remaining = n
for i = 0 to n-1
  if (bigrand() % remaining) < select
    print i
    select--
  remaining--