int n = 5;  // n rows in A, n+1 columns in B
range rAcol1 = [book1]A!col(1);  // assume sheet A's book is book1, range to column 1
range rAcol2 = [book1]A!col(2);  // assume sheet B's book is book1, range to column 2
range rB = [book1]B!;  // range to sheet B
newbook;  // create a new book for the output data
wks.nCols = rB.nCols*n;  // set the number of columns in the output sheet (active one)
for(int ii = 1; ii <= n; ii++)  // n rows
{
	for(int jj = 1; jj <= n+1; jj++)  // n+1 columns
	{
		range rBcoljj = [book1]B!wcol(jj);  // column jj in sheet B
		if(jj == 1)  // x column
		{
			wcol(jj+(ii-1)*(n+1)) = rBcoljj/rAcol1[ii];
			wks.col$(jj+(ii-1)*(n+1)).type = 4;  // set as x column
		}
		else  // y column
		{
			wcol(jj+(ii-1)*(n+1)) = rBcoljj/rAcol2[ii];
		}
	}
}