オフラインリアルタイムどう書く #27 の解答例

# coding:utf-8

def exist src, ptns
    ptns.each.any? do |ptn|
        ptn.each_char.all?{|c| !src.include? c}
    end
end

def proc src
    h = {
        14 =>%w(abc gc gh),
        15 =>%w(ab ge),
        16 =>%w(abc ghi gc),
        24 =>%w(dc h),
        25 =>%w(de),
        26 =>%w(hi dc),
        34 =>%w(bc fgc fgh),
        35 =>%w(b fge),
        36 =>%w(fghi bc fgc),
    }
    
    res = []
    h.each do |k,v|
        res.push k if exist(src, v)
    end
    res.empty? ? "-" : res.join(",")
end

DATA.each do |d|
    n, src, dst = d.split
    res = proc src
    puts "#{n} : #{src} : #{res} != #{dst}" unless res == dst
end


__END__
0	befi	14,16,24,26
1	abc	14,15,16,24,25,26,34,35,36
2	de	14,15,16,24,26,34,35,36
3	fghi	14,15,16,24,25,26,34,35,36
4	abcdefghi	-
5	ag	24,25,26,34,35,36
6	dh	14,15,16,34,35,36
7	bf	14,15,16,24,25,26
8	ch	15,25,35
9	be	14,16,24,26,34,36
10	ci	14,15,24,25,34,35