mzp https://blog.hatena.ne.jp/mzp/ みずぴー日記 https://mzp.hatenadiary.org/ Haskell 30分プログラム 30分プログラム、その776。anarchy golf - Negatenaryにインスパイアされて、-3進数への変換をやってみました。 基数が負の変換はやったことがなかったので、わりと苦戦しました。各桁が必ず正の数になるようにするのがむずい! 使い方 *Main> negatenary (-60) "2020" ソースコード negatenary :: Integral a => a -> String negQuotRem x y = let (q,r) = x `quotRem` y in if r < 0 then (q+1, r-y) else (q,r) negatenary 0 … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmzp.hatenadiary.org%2Fentry%2F20100627%2Fnegateary" title="-3進数への変換 - みずぴー日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2010-06-27 00:00:00 rich https://mzp.hatenadiary.org/entry/20100627/negateary 1.0 100%