Mahir Exercism • fsharp

Perfect Numbers

Ringkasan Tantangan

Determine if a number is perfect, abundant, or deficient based on Nicomachus' (60 - 120 CE) classification scheme for positive integers.

Visit the perfect-numbers exercise on Exercism to read the full instructions and download the exercise files.

Community Solutions

Lihat Solusi Komunitas

The following are the top 3 community solutions by stars:

Solution 1 by @fstiffo (⭐ 0) — View on Exercism
Solution 2 by @ErikSchierboom (⭐ 0) — View on Exercism
Solution 3 by @MichalMoudry (⭐ 0) — View on Exercism

Source: Exercism fsharp/perfect-numbers

💡 Lihat Solusi

module PerfectNumbers

type Classification = Perfect | Abundant | Deficient 

let classify n : Classification option = 
    if n <= 0 then None
    else
        let sum = [1..n/2] |> List.filter (fun x -> n % x = 0) |> List.sum
        match sum with
        | x when x = n -> Some Perfect