n,q=gets.chomp.split(" ").map { |e| e.to_i }
s = gets.chomp

l=[]
r=[]

q.times do |i|
  l[i], r[i] = gets.chomp.split(" ").map { |e| e.to_i }
end

def epl_sub(sub_str)
  leng = sub_str.length
  count = 0
  for i in 0..leng-2 do
    if sub_str[i..(i+1)] == "AC"
      count += 1
    end
  end
  return count
end

q.times do |i|
  sub_str = s[l[i]-1..r[i]-1]
  puts epl_sub(sub_str)
end
