F Sharp — część 2

/// Lista zawierająca pięć pierwszych elementów ciągu let firstFive = Seq.take 5 fibonacciSeq |> Seq.toList // val it : int list = [1; 2; 3; 5; 8]

/// Dziewiąty element ciągu let ninth = Seq.item 8 fibonacciSeq // val it : int = 55

/// Funkcja obliczająca średnią pierwszych `n' elementów ciągu let seqAverage seq n = Seq.take n seq |> Seq.map float |> Seq.average

/// Funkcja obliczająca średnią pierwszych `n' elementów ciągu Fibonacciego wykorzystująca ``auto-currying'' let fibonacciAverage = seqAverage fibonacciSeq

fibonacciAverage 10 // val it : float = 23.1

Przypisy

Linki zewnętrzne F# Software Foundation Try F# – nauka oraz możliwość wypróbowania języka

Kategoria:Języki programowania Kategoria:.NET