THANHPHO PAS

const
   fin='thanhpho.inp';fon='thanhpho.out';
   maxm=505;maxn=505;
var
   a,b:array[0..maxm,0..maxn] of longint;
   x:array[1..8] of longint = (-1,-1,-1,0,1,1,1,0);
   y:array[1..8] of longint = (-1,0,1,1,1,0,-1,-1);
   d:array[0..1000000] of longint;
   n,m,k:longint;

procedure Nhap;
var i,j:longint;
BEGIN
    read(m,n,k);
    for i:=1 to m do
        for j:=1 to n do read(a[i,j]);
end;

procedure xuli;
var i,max,c,j,p,s:longint;
begin
    for i:=1 to m do
        for j:=1 to n do
        begin
            s:=0;
            for p:=1 to 8 do
                s:=s+a[i+x[p],j+y[p]];
            d[s]:=1;
        end;
   for i:=1 to k do
   begin
       read(c);
    write(d[c],' ');
   end;
end;

begin
    assign(input,fin); reset(input);
    assign(output,fon);    rewrite(output);
    Nhap;
    xuli;
    close(input);close(output);
end.