program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

const
  MAXIN = 100000;

var
 n, m, min , i, j, mini, minj, k, x: integer;
 a: array [1..MAXIN] of integer;
 s: string;

function p(s: string; x, m: integer): integer;
var
  i: integer;
  sum: int64;
begin
  sum := 0;
  for i := 1 to length(s) do
    sum := sum + strtoint(s[i]) * trunc(exp(ln(x) * (i - 1)));
  p := sum mod m;
end;

begin
  k := 0;
  readln(n, x, m);

  for i := 1 to n do
  begin
    readln(s);
    a[i] := p(s, x, m);
  end;

  for i := 1 to n - 1 do
    for j := i + 1 to n do
      if (a[i] = a[j]) then
        inc(k);


  writeln(k);
  readln;
  readln;
end.