#require 'pp'

n, m = gets.chomp!.split(" ").map(&:to_i)
a_n = gets.chomp!.split(" ").map(&:to_i)

memo_left = Array.new(n, 0)

n.times do |i|
    memo_left[i] = (memo_left[i-1] || 0) + a_n[i]
end

#pp memo_left

count = 0
n.times do |i|
    i.upto(n-1) do |j|
        # (i, j) = (1, j) - (1, i)
        s = memo_left[j] - memo_left[i] + a_n[i]
        if s % m == 0
            count += 1
        end
    end
end

puts count
