PEをMathematicaで

Project Eulerに挑戦してみよう

Project Euler 225 / トリボナッチを割り切らない数

数列 1, 1, 1, 3, 5, 9, 17, 31, 57, 105, 193, 355, 653, 1201 ...は
T1=T2=T3=1 および
Tn=T(n-1)+T(n-2)+T(n-3)
によって定義される。27はこの数列の任意の項を割り切らないことが証明できる。27はこの性質を持つ最初の奇数である。

この数列の任意の項を割り切らない124番目の奇数を求めよ。

Problem 225 - Project Euler


普通の方法で解けてしまった。(1, 1, 1)からはじめて
(x, y, z) → (y, z, Mod(x+y+z, n))
のように置き換えていきます。ループの終了条件は「第3成分が0になる」または「(1, 1, 1)にもどる」。(1, 1, 1)にもどったら,その数は条件をみたしています。


この問題を解いたことでIDが平方数の問題を13問解いたことになり,Unlucky Squares というアワードを獲得しました。
f:id:variee:20170505212337p:plain