mzp https://blog.hatena.ne.jp/mzp/ みずぴー日記 https://mzp.hatenadiary.org/ Haskell http://www.agusa.i.is.nagoya-u.ac.jp/person/mzp/hiki/?exerciseに書いた問題の検証用。 完全数かどうかを判定するプログラムを書け。完全数(perfect number)とは、その数字自身を除く約数(divisor)の和が、その数字自身になる数字のこと。例: 6 = 1+2+3 28 = 1+2+4+7+14 496 = 1+2+4+8+16+31+62+124+248 divisor n = filter (\x-> n `mod` x == 0) [1..n] perfect n = (n*2) == (sum $ divisor … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmzp.hatenadiary.org%2Fentry%2F20070616%2Fperfect" title="完全数 - みずぴー日記" 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 2007-06-16 00:00:01 rich https://mzp.hatenadiary.org/entry/20070616/perfect 1.0 100%