30分プログラム、その721。10000までの完全数をもとめる(Haskell)にインスパイアされました。 元々は、mixiにあった問題らしいです。 使い方 - perfects 10000; val it = [0,6,28,496,8128] : int list ソースコード fun id x = x; fun range n = List.tabul…