{p=$1;n=$2
for(i=0;i++<n;V[i]=1==i)for(j=0*getline;j++<n;)M[i,j]=$j
for(;p--;split($0,V))for(i=0;i++<n;)for(j=$i=0;j++<n;)$i+=M[i,j]*V[j]}sub(/[^ ]+ /,_)