#include<cstdio>
#include<queue>
#include<algorithm>
using namespace std;
#define MAXN 2010
#define MAXQ 1000010
#define re register 
#define il inline

int n,l,q;
int t[MAXN][MAXN];
struct node{
	int a,b,c,id;
	friend bool operator < (node a,node b){
		return a.c<b.c;	
	}
} op[MAXQ];
bool ans[MAXQ];

struct edge{
	int v,nxt;
} e1[MAXN*MAXN];
int head[MAXN],cnte=0;
il void ad(int u,int v){
	e1[++cnte].v=v;
	e1[cnte].nxt=head[u];
	head[u]=cnte;
}

bool e[MAXN][MAXN];
int bel[MAXN],belp[MAXN],cnt=0;
il void ade(int u,int v){
	if(e[u][v]) return;
	if(!bel[u] && !bel[v]){
		ad(u,v);
		e[u][v]=true;
		return;
	}
	if(bel[u]==bel[v]) return;
	if(bel[u]) u=belp[bel[u]];
	if(bel[v]) v=belp[bel[v]];
	if(!e[u][v]) ad(u,v);
	if(!e[v][u]) ad(v,u);
	e[u][v]=e[v][u]=true; 
}
bool vis[MAXN];
int typ[MAXN];
char s[MAXN*2];
queue <int> qu;
il bool bfs(re int s,re int t){
	if(s==t) return true;
	for(re int i=1;i<=n;i++)
		vis[i]=false;
	while(!qu.empty()) qu.pop();
	qu.push(s);
	vis[s]=true;
	while(!qu.empty()){
		re int u=qu.front();
		if(e[u][t]) return true;
		qu.pop();
		for(re int i=head[u];i;i=e1[i].nxt){
			re int v=e1[i].v;
			if(v==t) return true;
			if(vis[v]) continue;
			vis[v]=true;
			qu.push(v);
		}
	}
	return false;
}

void solve(){
	scanf("%d%d%d",&n,&l,&q);
	for(int i=1;i<=n;i++)
		for(int j=1;j<=n;j++)
			e[i][j]=false;
	for(int i=1;i<=n;i++){
		e[i][i]=true;
		bel[i]=head[i]=0;
	}
	cnte=0;
	while(cnt) belp[cnt--]=0;
	for(int i=1;i<=l;i++){
		scanf("%s",s+1);
		for(int j=1;j<=n;j++)
			t[i][j]=(s[2*j-1]-'0')*50+(s[2*j]-'0');
	}
	for(re int i=1;i<=q;i++){
		scanf("%s",s+1);
		op[i].a=(s[1]-'0')*50+(s[2]-'0');
		op[i].b=(s[3]-'0')*50+(s[4]-'0');
		op[i].c=(s[5]-'0')*50+(s[6]-'0'); 
		op[i].id=i;
		ans[i]=0;
	}
	sort(op+1,op+1+q);
	re int now=0;
	for(re int i=1;i<=q;i++){
		re int a=op[i].a,b=op[i].b,c=op[i].c,id=op[i].id;
		while(now<c){
			now++;
			typ[now]=0;
			for(re int j=1;j<=n;j++)
				vis[j]=false;
			for(re int j=1;j<=n;j++){
				if(!vis[t[now][j]]) vis[t[now][j]]=true;
				else {
					if(!typ[now]) typ[now]=t[now][j]; 
					else typ[now]=-1;
				}
			}
			if(typ[now]==-1) continue;
			if(typ[now]){
				re int id1=0,id2=0,id3=0;
				for(re int j=1;j<=n;j++) vis[j]=false;
				for(re int j=1;j<=n;j++){
					if(t[now][j]==typ[now])
						if(!id1) id1=j;
						else id2=j;
					vis[t[now][j]]=true; 
				}
				for(re int j=1;j<=n;j++)
					if(!vis[j]) id3=j;
				ade(id1,id3);
				ade(id2,id3);
			}else {
				for(re int j=1;j<=n;j++)
					vis[j]=false;
				for(re int j=1;j<=n;j++){
					if(!vis[j]){
						re int nowj=j;
						if(!bel[j]){
							bel[j]=++cnt;
							belp[cnt]=j;
						}
						do{
							vis[nowj]=true;
							if(nowj!=j){
								if(bel[nowj]){
									if(bel[nowj]!=bel[j]){
										re int u=belp[bel[nowj]],v=j;
										if(!e[u][v]) ad(u,v);
										if(!e[v][u]) ad(v,u); 
										e[u][v]=e[v][u]=true;
										bel[nowj]=bel[j];
									}
								}else {
									bel[nowj]=bel[j];
									if(!e[nowj][j]) ad(nowj,j);
									if(!e[j][nowj]) ad(j,nowj);
									e[nowj][j]=e[j][nowj]=true;
								}
							}
							nowj=t[now][nowj];
						} while(nowj!=j);
					}
				}
			}
		}
		ans[id]=bfs(a,b);
	}
	for(int i=1;i<=q;i++)
		printf("%d",(int)ans[i]);
	printf("\n");
}

int main()
{
	int t;
	scanf("%d",&t);
	while(t--)
		solve();
	return 0;
}