N, Q = gets.split.map(&:to_i)
S = gets.chomp!
Ary = readlines.map(&:chomp!).map { |e| e.split.map(&:to_i) }

Ary.each do |line|
  l = line[0] - 1
  r = line[1] - 1

  puts S[l..r].scan('AC').size
end
