3912657840はすごい数字

3912657840 は次の性質を持つ。

性質：
0を除く全ての一桁の数で割り切れ、
この数に含まれる任意の隣り合う二桁（39,91,12,26,65,57,78,84,40）でも割ることができる数である。
また、数字の0から9までを一度ずつ使っている数である。

質問：
そのような性質を持つものは3912657840だけですか？

No.2 回答者： sak_sak 回答日時： 2011/07/10 17:34

「3912657840はすごい数字」ではなく

「3912657840はすごい数」だと思います。

No.1 ベストアンサー 回答者： koko_u_u 回答日時： 2011/07/09 23:30

虱潰しで調べた結果、そうみたいだね。

require 'set'

def digit_set(n)
　Set.new(n.to_s.each_char) { |c| c.to_i }
end
def digit_ar(n)
　n.to_s.each_char.map(&:to_i)
end

base_num = 5*7*8*9
start = (1000000000 / base_num + 1) * base_num

start.step(9999999999, base_num) do |n|
　if digit_set(n) == Set[*(0..9).to_a]
　　if digit_ar(n).each_cons(2).all? { |high, low| n % (high* 10 + low) == 0 }
　　　puts n
　　end
　end
end

この回答へのお礼

まことにありがとうございました

お礼日時：2011/07/11 01:49