#pragma GCC target("avx")
#pragma GCC optimize("O3")
#pragma GCC optimize("unroll-loops")
#include <bits/stdc++.h>
#include <atcoder/all>
using namespace std;
using namespace atcoder;
int main() {
	cin.tie(0);
	ios::sync_with_stdio(false);
	int N;
	long long P;
	cin >> N >> P;
	vector<long long> A(N);
	for( int i = 0; i < N; i++ ) {
		cin >> A[i];
	}
	long long ans = 0;
	for( long long p = P; p <= 1000000000LL; p*=P ) {
		map<long long, long long> cnt;
		for( int i = 0; i < N; i++ ) {
			cnt[A[i]%p]++;
		}
		for( auto [x, y] : cnt ) {
			ans += y*(y-1)/2;
		}
	}
	cout << ans << endl;
}