第18回オフラインリアルタイムどう書くの参考問題をHaskellで解いた ref: http://qiita.com/liveinwood/items/d5fe7ce141ec8ac01a45