N, Q = gets.chomp.split(" ").map{|s| s.to_i }
S = gets.chomp

q_arr = []
Q.times do |i|
  q_arr << gets.chomp.split(" ").map{|s| s.to_i }
end

iarr = Array.new(N, nil)
(N-1).times do |i|
  iarr[i] = 1 if S[i..(i+1)] == "AC"
end

q_arr.each do |l, r|
  p iarr[(l-1)..(r-2)].select{|n| n}.count
end
