プロジェクトオイラー問3 「最大の素因数」 †

http://odz.sakura.ne.jp/projecteuler/index.php?cmd=read&page=Problem%203

13195 の素因数は 5, 7, 13, 29 である.

600851475143 の素因数のうち最大のものを求めよ.

カウボーイビバップパロ

教授が言った。

再帰よ

お前の体は何でできているか知っているか？

しらねえよ、きっとどこにでも転がっているアルファベットスープだろうさ。

教授が言った。

お前の魂は何でできているか知っているか？

しらねえよ、きっとどこにでも転がっているオープンソースだろうさ。

グルは言った。

その答えは間違っていてあっている

お前の体はスフィアのすべてとつながっていながらお前にしかなりえない。

お前の魂はスフィアのすべてとつながっていながらお前でしかありえない

それはこの私もお前も。

誰かと写像を持てばお前は自分も写像を持っている

誰かと同形ならお前も自分と同形を持っている

俺は誰にも何にも関係がないよ

教授はいった。

それはスフィアで何よりも不幸なことだ。

divs(N,Div,N):-

(N mod Div)>0,

!.

divs(N ,Div,Result):-

N1 is N//Div,

divs(N1,Div,Result).

search(N,Div):-

N=<Div*Div,

!,

write([N,Div]).

search(N,Div):-

divs(N,Div,N1),

Div1 is Div+1,

search(N1,Div1).

main:-search(600851475143,2).

元ネタ　

マフィングブルが言った

泳ぐ鳥よ

お前の体は何でできているか知っているか

しらねえよ　きっとどこにでも転がっている鳥の糞だろうさ

グルは言った

泳ぐ鳥よ

お前の魂は何でできているか知っているか

俺は言った　しらねえよきっとどこにでも転がっている綿ぼこりだろうさ

グルは言った

その答えは間違っていてあっている

お前の体は宇宙のすべてとつながっていながらお前にしかなりえない

お前の魂は宇宙のすべてを含んでいながらお前でしかありえない

それはこの私もお前も

誰かが憎ければお前は自分を憎んでいる

誰かを愛していればお前は自分を愛している

俺は誰にも何も感じないよ。

グルは言った

それは地上で何よりも不幸なことだ。