2012-01-12から1日間の記事一覧
何故 sprintf で出来ないのだろうか。。 open System; let fn (x:int) = String.Format("{0:#,#}", x);; let fn x = let cc = [| ""; ""; ""; ","; |] let rec fn' x (s:string) = if x <= 0 then s else fn' (x/10) ((string (x%10)) + cc.[s.Length % 4] +…
何故 sprintf で出来ないのだろうか。。 open System; let fn (x:int) = String.Format("{0:#,#}", x);; let fn x = let cc = [| ""; ""; ""; ","; |] let rec fn' x (s:string) = if x <= 0 then s else fn' (x/10) ((string (x%10)) + cc.[s.Length % 4] +…