ツリーの中の数

やるだけですね.とりあえずn<=10**15まで耐えられるっぽいです.

tyama_f06.rb

#!/usr/bin/env ruby
#http://nabetani.sakura.ne.jp/hena/ordf06numit/
#https://qiita.com/Nabetani/items/deda571c9451bd7d3175
STDOUT.sync=true

def dfs(n,t)
    return 1 if n==t
    return 0 if n<t
    $memo[n]||=[n/2-10,n*2/3].map{|e|
        e>0 ? dfs(e,t) : 0
    }.reduce(:+)
end

while gets
    $memo={}
    n,t=$_.split(',').map(&:to_i)
    p dfs(n,t)
end