In[]:=
Table[ArrayPlot[Table[10i+j,{i,5},{j,5}]],{x,2},{y,2}]
Out[]=
In[]:=
GraphicsGrid[Table[ArrayPlot[Table[10i+j,{i,5},{j,5}]],{x,2},{y,2}],ImageSize->Large]
Out[]=