n,q = gets.chomp.split.map(&:to_i)
s = gets.chomp
t = [0]
n.times do |num|
	if s[num..(num + 1)] == "AC"
		t << t[num] + 1
	else
		t << t[num]
	end
end

q.times do
	str_s,str_e = gets.chomp.split.map{|i| i.to_i - 1}
	puts t[str_e] - t[str_s]

end