プログラムで解く数学 連続する素数の和で1000未満の素数を表したときに項数が最長になるのは953で21項を持つ. 100万未満の素数を連続する素数の和で表したときに最長になるのはどの素数か? さて、面倒でちょっと途中だけど。 main = print $ maxprime [2] 2…

8時前起床。 朝市から独逸語の授業があるのにー 8時半前に出発、無事間に合う。 期末替わりの会話テストと筆記試験の説明を聞く。 それから体育。 レポート提出。 うーん、あんなかんじでよかったんだろうか。一応掘り下げてはいると思うんだけど。 今日はエ…

import System.IO main = do fp <- openFile "test.txt" ReadWriteMode cs <- getContents hPutStr fp (revenue $ words cs) hGetLines fp >>= putStrLn hClose fp revenue :: [String] -> String revenue (j:js) | j == "in" = head js | j == "out" = "-" …