Problem:
ハミング数

1 に 2, 3, 5 を何回か (0 回以上) かけ算して得られる数をハミング数 (Hamming numbers) と呼びます。例えば、

1

1 × 2 × 2 = 4

1 × 2 × 2 × 3 × 5 × 5 = 300

などはハミング数ですが、11, 13, 14 などはハミング数ではありません。

ハミング数はどれも 60 のべき乗を割り切る(例えば、54 は 603 = 21600 を割り切る) ので、時刻など 60 進法の計算には都合の良い数として昔から知られていました。また、楽器の調律に用いる音階の一つである純正律では、音の周波数の比が 24, 27, 30, 32, 36, 40, 45, 48 というハミング数からなる数列になります。

整数 m、n を入力とし、m 以上 n 以下のハミング数の個数を出力するプログラムを作成してください。

Input

複数のデータセットの並びが入力として与えられます。入力の終わりはゼロひとつの行で示されます。

各データセットとして、２つの整数 m と n (1 ≤ m, n ≤ 1000000, m ≤ n) が空白区切りで１行に与えられます。

データセットの数は 20 を超えません。

Output

データセットごとに m 以上 n 以下のハミング数の個数を１行に出力します。

Sample Input

3 8
1 27
1 86
0

Output for the Sample Input

5
17
31

Solution in Ruby (judge verdict: Accepted)

h = {}
primes = [2, 3, 5]
position = [0, 0, 0]
numbers = [1]
n_numbers = Array.new(1_000_001, 0)
n_numbers[1] = 1
while numbers.last < 1_000_000
	primes.each_with_index{|prime, i| position[i] += 1 while h[numbers[position[i]] * prime]}
	min = [numbers[position[0]] * primes[0], numbers[position[1]] * primes[1], numbers[position[2]] * primes[2]].min
	numbers << min
	h[min] = true
	n_numbers[min] = 1
end
1.upto(1_000_000){|i| n_numbers[i] += n_numbers[i - 1]}

while true
    m, n = gets.chomp.split.map(&:to_i)
    break if m == 0
    puts n_numbers[n] - n_numbers[m - 1]
end