http://projecteuler.net/index.php?section=problems&id=54 カスタムのソートはsortByを使う。 import Data.List a = [ 3, 1, 4, 1, 5 ] b = sort a -- [1,1,3,4,5] c = zip [1..] a d = sortBy cmp c -- [(2,1),(4,1),(1,3),(3,4),(5,5)] cmp (n1,m1) (n2,…

プロジェクトオイラー http://projecteuler.net/index.php?section=problems&id=279 こういう問題文が短いものは難しいにちがいない。時間もあまりないしゆっくりやろう。 すぐにいつものパターンであることがわかった。しかし、なかなかうまくいかない。結…