using System; using static System.Console; using System.Linq; using System.Collections.Generic; class Program { static int NN => int.Parse(ReadLine()); static int[] NList => ReadLine().Split().Select(int.Parse).ToArray(); static int[][] NArr(long n) => Enumerable.Repeat(0, (int)n).Select(_ => NList).ToArray(); public static void Main() { Solve(); } static void Solve() { var c = NList; var (n, p) = (c[0], c[1]); var a = NList; var max = a.Max(); var div = (long)p; var ans = 0L; while (true) { if (div >= max) break; var dic = new Dictionary(); foreach (var ai in a) { var am = ai % div; if (dic.ContainsKey(am)) { ans += dic[am]; ++dic[am]; } else dic[am] = 1; } div *= p; } WriteLine(ans); } }