f=file("stdin","r")
for(i in 0:99){m=matrix(c(a<-scan(f,nlines=1),scan(f,nlines=n<-length(a)/2)),,n)
write(m[0:-n,]%*%m[1:n,],1,n)
cat("
")}