a[999],i,j,k,s;main(c){for(;~scanf("%d%[ ]",a+i++,&k);s=33/k+s?s:i)for(;j*2/i?s=i=j=!puts(""):i==s*s*2;printf("%d%c",c,++j%s?32:10))for(c=k=0;k<s;)c+=a[j/s*s*2+k]*a[k++*s*2+s+j%s];}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).