2011-01-16から1日間の記事一覧

どう書く? - ピラミッド作成

F#

ピラミッドを作る - どう書く? org、与えられた文字列でピラミッド - どう書く? org をF#で考えてみました。 module Pyramid1 = //http://ja.doukaku.org/8/ let Pyramid (stageCount : int) = for i=1 to stageCount do Array.create (stageCount - i) " " …

どう書く? - 与えられた数字のケタ数

F#

与えられた数字のケタ数 - どう書く? org をF#で考えてみました。 open System [<EntryPoint>] let main(args : string[]) = let ParseNumber num = let rec _parse _n (a,b) = if _n > 0 then _parse (_n / 10) (a+1,b*10) else (a,b/10) let ret = _parse num (0,1) pr</entrypoint>…

どう書く? - 九九の表示

F#

九九の表示- どう書く? org をF#で考えてみました。 F#書式設定は慣れませんねぇ、、結局Formatメソッド使いましたよ。 open System [<EntryPoint>] let main(args : string[]) = for i in 1 .. 9 do ignore(List.map (fun n -> printfn "%s" (System.String.Format("{0}</entrypoint>…