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

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];

bool e[MAXN][MAXN];
int bel[MAXN],belp[MAXN],cnt=0;
bool vis[MAXN];
int typ[MAXN];
char s[MAXN*2];
queue <int> qu;
bool bfs(int s,int t){
	for(int i=1;i<=n;i++)
		vis[i]=false;
	queue <int> qu;
	while(!qu.empty()) qu.pop();
	qu.push(s);
	vis[s]=true;
	while(!qu.empty()){
		int u=qu.front();
		if(u==t) return true;
		qu.pop();
		for(int i=1;i<=n;i++){
			if(vis[i]) continue;
			if(e[u][i]) {
				if(i==t) return true;
				vis[i]=true;
				qu.push(i);
			}
		}
	}
	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;
	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(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);
	int now=0;
	for(int i=1;i<=q;i++){
		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(int j=1;j<=n;j++)
				vis[j]=false;
			for(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]){
				int id1=0,id2=0,id3=0;
				for(int j=1;j<=n;j++) vis[j]=false;
				for(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(int j=1;j<=n;j++)
					if(!vis[j]) id3=j;
				e[id1][id3]=e[id2][id3]=true; 
			}else {
				for(int j=1;j<=n;j++)
					vis[j]=false;
				for(int j=1;j<=n;j++){
					if(!vis[j]){
						int nowj=j;
						if(!bel[j]){
							bel[j]=++cnt;
							belp[cnt]=j;
						}
						do{
							vis[nowj]=true;
							if(nowj!=j){
								if(bel[nowj])
									e[belp[bel[nowj]]][j]=e[j][belp[bel[nowj]]]=true;
								else {
									bel[nowj]=bel[j];
									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;
}