仅在工作日生成随机日期

Question

我试图生成随机日期，在当天之后的10天至30天内的任何一天以及生成的日期不应该是周六和周日。我搜索了很多，但还没有找到解决方案。

Answer 1

尝试：

repeat 
    day <- pickRandomDay(10 ... 30) 
until (not satOrSun(day)) 
return day 

你不会得到太多次一轮循环。