小编Cam*_*les的帖子

先生们,

我有一个票务系统.现在,当用户要求2张或3张票时,我必须选择相邻的地方.每张票都有一个行号和列号.相邻位置的概念与相邻列号位于同一行.这些票证位于sql server数据库中.有关此算法的任何想法,以搜索可用的相邻席位？

问候,

卡米洛

我编写了以下代码来测试F#中的一些MonteCarlo代码.

我的问题是我只在控制台中看到随机数和"oi"一次.我调用了两次oneRun函数,但它看起来只运行一次.

这是代码:

let genRandomNumbers count =
    let rnd = System.Random()
    printf "oi "
    List.init count (fun _ -> rnd.NextDouble ())

let oneRun = 
   let numberofClicks = 0
   let randomNumber = genRandomNumbers 50
   let action numberofClicks random = if random <= 0.10 
                                          then numberofClicks+1
                                          else numberofClicks
   randomNumber |> Seq.iter (printf "%f ")
   randomNumber |> List.fold action numberofClicks

[<EntryPoint>]
let main argv = 
    let a = oneRun
    printf "%d " a
    let b = oneRun
    printf "%d " b …