>>602
p = 3
q = 7
(1..100).each do |k|
　v = 0
　(0..(k/p)).each do |m|
　　(0..((k-m*p)/q)).each do |n|
　　　if k == m*p + n*q
　　　　v += 1
　　　end
　　end
　end
　print "v(#{k})=#{v}\n"
end