n, m = STDIN.gets.chomp.split(" ").map(&:to_i)
result = Array.new(m, 0)
n.times do |i|
  l, r = STDIN.gets.chomp.split(" ").map(&:to_i)
  m.times do |i|
    if l % (i + 1) == 0 || r % (i + 1) == 0
      result[i] += 1
    elsif l < (i + 1) && (i + 1) < r
      result[i] += 1
    elsif (l / (i + 1)) * (i + 1) + (i + 1) < r
      result[i] += 1
    end
  end
end
result.each do |r|
  puts r
end