a:=(f:=File standardInput)readLine;b:=f readLine;for(i,1,b size,for(j,1,c:=a size,for(k,1,c,write("(",a slice(j-1,j),b slice(i-1,i),a slice(k-1,k),")"))"
"print))