とにかく進むねん。


2025 04,11 19：09	[PR] CATEGORY[]
× [PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。


2012 10,14 17：03	anarchy golf (Haskell) [Harshad numbers] CATEGORY[未選択]
【初稿】 78バイト import Char main=mapM print[x\|x<-[1..2000],mod x(sum$map digitToInt$show x)<1] digit sum の解答が落ちていたので、拾い乞食してしまった。。。【修正後1】 74バイト f 0=0 f x=mod x 10+f(div x 10) main=mapM print[x\|x<-[1..2000],x`mod`f x<1] PR
コメント[0]

ブログ内検索

	とにかく進むねん。勉強サークルのブログです。もがきながらでも進むこと。これがモットーです。