程序如下：
m[x_, y_] := x + y
n[x_, y_] := x*y
x = {1, 2, 3}
y = {10, 20, 30}
z = { { m[1, 10], n[1, 10] }, { m[2, 20], n[2, 20]}, { m[3, 30], n[3, 30] } }
Out[51]= {1, 2, 3}
Out[52]= {10, 20, 30}
Out[53]= {{11, 10}, {22, 40}, {33, 90}}
Z目前是手动输入的数据，如果要求Z自动取X，Y列表的数据，生产一个新的Z列表。代码如何实现？请大神赐教。

MapThread[Through@*{m,n},{x,y}]