N, Q = gets.split(" ").map(&:to_i)
S= gets.chomp.chars
nums = [0]
count = 0
N.times do |i|
    if S[i] == "A" && S[i + 1] == "C"
        count += 1
    end
    nums << count
end
Q.times do 
    l, r = gets.split(" ").map(&:to_i)
    puts nums[r - 1] - nums[l - 1]
end

