2011-01-17から1日間の記事一覧
隣り合う二項の差- どう書く? org これはひどい。関数プログラミングらしく考えられませんでした。。。。 let Diff (xs : int list) = let mutable result = [] for i=1 to xs.Length-1 do result <- ((xs.[i]-xs.[i-1])::result) List.rev result [<EntryPoint>] let ma</entrypoint>…
隣り合う二項の差- どう書く? org これはひどい。関数プログラミングらしく考えられませんでした。。。。 let Diff (xs : int list) = let mutable result = [] for i=1 to xs.Length-1 do result <- ((xs.[i]-xs.[i-1])::result) List.rev result [<EntryPoint>] let ma</entrypoint>…