P24 (*) Lotto: Draw N different random numbers from the set 1..M.

问题描述

The selected items shall be returned in a list.

sash> (lotto-select 6 49)
   -> (23 1 17 33 21 37)

Hint: Combine the solutions of problems P22 and P23.

解法

(define lotto-select
    (lambda (N M)
      (rnd-select (range 1 M) N)))