Problem in 5 F#

Post date: Aug 27, 2009 8:17:01 AM

let rec divisible n =

let divbyall20 k =

let lista = Seq.map (fun x -> k % x ) {1..20}

if (Seq.sumByInt (fun x -> x) lista) = 0 then true

else false

if divbyall20 n then n

else divisible (n + 20)

printf "Problem 5: %d\n" (divisible 20)