10/02/19 20:46:28
>>739
// F#
// click : 最大クリック数、page : 全ページ数
let minLink click page =
Seq.initInfinite id
|> Seq.find (fun x -> List.sumBy (pown x) [0 .. click] >= page)
10/02/19 20:46:28
>>739
// F#
// click : 最大クリック数、page : 全ページ数
let minLink click page =
Seq.initInfinite id
|> Seq.find (fun x -> List.sumBy (pown x) [0 .. click] >= page)