PEをMathematicaで

Project Eulerに挑戦してみよう

2017-03-27から1日間の記事一覧

Project Euler 35 / 巡回素数

197は巡回素数と呼ばれる。桁を回転させたときに得られる数 197, 971, 719 がすべて素数だからである。100未満には巡回素数が13個ある。2, 3, 5, 7, 11, 13, 17, 31, 37, 71, 73, 79, 97である。100万未満の巡回素数はいくつあるか?Problem 35 - Project Eu…

Project Euler 112 / はずみ数

左から右までどの桁もその左の桁を下回らない数を増加数と呼ぶ。 例 134468同様に, どの桁もその右の桁を下回らない数を減少数と呼ぶ。 例 66420増加数でも減少数でもない正の整数を「はずみ数」と呼ぶことにする。 例 155349100以下にはずみ数がないのは明…

Project Euler 57 / 平方根の近似分数

2の平方根は無限に続く連分数で表すことができる。√ 2 = 1 + 1/(2 + 1/(2 + 1/(2 + ... ))) = 1.414213...最初の4回の繰り返しを展開すると以下が得られる。 1 + 1/2 = 3/2 = 1.5 1 + 1/(2 + 1/2) = 7/5 = 1.4 1 + 1/(2 + 1/(2 + 1/2)) = 17/12 = 1.41666...…

Project Euler 58 / 螺旋素数

1からはじめて以下のように反時計回りに数字を並べていくと,辺の長さが7の渦巻きができる。37363534333231381716151413303918543122940196121128412078910274221222324252643444546474849面白いことに奇平方数が右下の対角線上に出現する。もっと面白いこと…