challenge n人中m人が当選するくじ

n人の中から公平にm人を選ぶ、くじ引きプログラムを作ってください。

Posted feedbacks - Arc

Arcです。
お題46の「重複無し乱数」で定義したbingoを使用しています。
(lot 999 4)
;=> (484 286 880 186)
;...
;=> (699 151 312 134) 
1
2
(def lot (n m)
  (firstn m (bingo n)))

Index

Feed

Other

Link

Pathtraq

loading...