#include<bits/stdc++.h> 
#define ull unsigned long long
#define lch(x) t[x].s[0] 
#define rch(x) t[x].s[1]
#define INF 0x3f3f3f3f
#define ll long long 
#define lll __int128
#define re register
#define inl inline
#define N 1000050
#define rx x<<1|1
#define lx x<<1
using namespace std;

inline int read(){
	int w = 1 ,s = 0;
	char ch = getchar();
	while(!isdigit(ch)){
		if(ch=='-') w = -1;
		ch = getchar();
	}
	while(isdigit(ch)){
		s = (s<<3)+(s<<1)+ch-'0';
		ch = getchar();		
	}
	return w*s;
}

struct query{
	int time ,a ,b ,id ;
	bool operator<(const query&a) const{
		return time < a.time ;
	}
} ;

int cnt ,cnt1 ,top ,n ;
int scc[N] ,low[N] ,dfn[N] ,isstk[N] ,stk[N] ,ind[N] ;

int tot ;
int head[N] ,edge[N] ,ver[N] ,nxt[N] ;
bitset<2005> f[2005] ;

std::vector<int> v[N] ;

inl void add(int x,int y){
	edge[++tot] = y ;
	nxt[tot] = head[x] ;
	head[x] = tot ;
}

void tarjan(int x){
	dfn[x] = low[x] = ++ cnt ;
	isstk[x] = 1 ,stk[++top] = x ;
	for(int i = head[x];i;i = nxt[i]){
		int v = edge[i] ;
		if(!dfn[v]){
			tarjan(v) ;
			low[x] = min(low[x],low[v]) ;
		}
		else if(isstk[v]) low[x] = min(low[x],dfn[v]) ;
	}

	if(dfn[x] == low[x]){
		cnt1 ++ ;
		int y ;
		do{
			y = stk[top--] ;
			scc[y] = cnt1 ;
			f[scc[y]] |= 1 << y ;
			isstk[y] = false ;
		}while(y != x) ;
	}
}

void getpath(){
	for(int i = 1;i <= n;i ++ ) ind[i] = 0 ;
	for(int i = 1;i <= n;i ++ ){
		for(int j = head[i];j;j = nxt[j]){
			int vv = edge[j] ;
			if(scc[vv] == scc[i]) continue ;
			v[scc[vv]].push_back(scc[i]) ;
			ind[scc[i]] ++ ;
		}
	}
}

void toposort(){
	queue<int> q ;
	for(int i = 1;i <= cnt1;i ++ ) if(!ind[i]) q.push(i) ;
	while(!q.empty()){
		int x = q.front() ;
		q.pop() ;
		for(auto to : v[x]){
			f[to] |= f[x] ;
			if(!--ind[to]) q.push(to) ;
		}
	}
}

void solve(){
	int m ,q ;
	tot = 0 ;
	cin >> n >> m >> q ;
	std::vector<std::vector<int>> t(m+1) ;
	std::vector<int> num(n+1) ,anx(q) ;
	std::vector<query> Q(q) ;

	auto get = [&](){
		char s1 ,s2 ;
		cin >> s1 >> s2 ;
		int p1 = (s1 - 48) * 50 + s2 - 48 ;
		return p1 ;
	} ;

	for(int i = 1;i <= m;i ++ ){
		for(int j = 1;j <= n;j ++ ){
			int p = get() ;
			t[i].push_back(p) ;
			//cout << p << " \n"[j == n] ;
		}
	}
	cnt = cnt1 = n ;
	for(int i = 1;i <= n;i ++ ) {
		f[i].reset() ;
		f[i][i] = 1 ;
		scc[i] = i ;
		dfn[i] = 0 ;
		v[i].clear() ;
	}

	for(int i = 0;i < q;i ++ ) {
		int a = get() ,b = get() ,c = get() ;
		Q[i] = {c,a,b,i} ;
	}
	sort(Q.begin(),Q.end()) ;

	int time = 0 ;
	for(int i = 0;i < q;i ++ ){
		while(time + 1 <= m && time + 1 <= Q[i].time){
			time ++ ;
			for(auto val : t[time]) num[val] ++ ;
			int sum = 0 ,px = 0 ;
			for(int i = 1;i <= n;i ++ ) {
				sum += !num[i] ;
				if(num[i] >= 2) px = i ;
			}
			if(!px){
				for(int i = 0;i < n;i ++ ){
					int to = t[time][i] ;
					if(scc[i+1] != scc[to]){
						add(i+1,to) ;
					}
				}
			}
			else if(sum < 2) {
				int p = 0 ;
				for(int i = 0;i < n;i ++ ){
					if(!num[i+1]) p = i + 1 ;
				}
				if(p){
					for(int i = 0;i < n;i ++ ){
						if(t[time][i] == px && scc[i+1] != scc[p]){
							add(i+1,p) ;
						}
					}
				}
			}
			for(int i = 1;i <= n;i ++ ) dfn[i] = num[i] = 0 ;
			for(int i = 1;i <= cnt1;i ++) f[i].reset() ;
			cnt = cnt1 = top = 0 ;
			for(int i = 1;i <= n;i ++ ) if(!dfn[i]){
				tarjan(i) ;
			}
		}
		for(int i = 1;i <= n;i ++ ) v[i].clear() ;
		getpath() ;
		toposort() ;
		int a = scc[Q[i].a] ,b = Q[i].b ,c = Q[i].time ;
		// for(int i = 1;i <= cnt1;i ++ ) {
		// 	for(int j = 1;j <= n;j ++ )cout << f[i][j] ;
		// 	cout << endl ;
		// }
		// cout << a << ' ' << b << ' ' << c << endl ;

		//cout << cnt1 << endl ;
		anx[Q[i].id] = f[a][b] ;
		//cout << time << endl ;
	}
	for(int i = 0;i < q;i ++ ) cout << anx[i] ;
	//cout << endl ;

	cout << endl ;
	for(int i = 1;i <= n;i ++ ) head[i] = 0 ;
}

int main(){
	ios::sync_with_stdio(false);
	
	int t ;
	cin >> t ;
	while(t -- )
	solve() ;
}