相关疑难解决方法(0)

我对这个问题的F#解决方案并不满意,因为我找不到一个漂亮而快速的解决方案,但这不是问题所在.问题是,我将解决方案转换为C#,因为它很快.喜欢,非常快,相对而言.

我无法弄清楚为什么.是的,我去过Reflector,C#代码看起来非常相似,不能说我真的了解IL但它看起来有点像.我唯一能想到的是F#int []对C#List的表现.

所以这里:

F#

module Euler023

let divisorsSum n =
  let mutable sum = 1
  let limit = (int (sqrt(float n)))
  for i in [2..limit] do
    if n%i=0 then sum <- sum+i+n/i
  if (limit*limit)=n then sum-limit else sum

let isAbundant x = (divisorsSum x)>x
let abundants  = [1..28123] |> List.filter isAbundant |> List.toArray
let domain = System.Collections.BitArray(28124)

let rec loopUntil i j =
    if i=abundants.Length then ()
    elif j=abundants.Length then loopUntil (i+1) (i+1)
    else
      let sum = abundants.[i]+abundants.[j] 
      if …