- プログラミングのお題スレ Part4
127 ：デフォルトの名無しさん[sage]：2014/06/22(日) 08:50:48.27 ID:fDsJnYZI - >>114 Io
f := method(s,
a := s size
for(i, 1, a - 1,
if(a % i == 0 and (s slice(0, a - i)) == s slice(i),
return s slice(0, i)
)
)
s
)
Io> f("abab"repeated(100000))
==> ab
Io> f("1234123")
==> 1234123
Io> d:=("1234123"repeated(10000).."x");d==f(d)
==> true
|
|