A=Tuples[Table[x,{x,1,9}],{3}]
Out[]=