var n,m,i,j,k:integer; begin readln(n); for i:=1 to n do begin readln(m); for j:=1 to 3*m do begin for k:=1 to m do write('ACM'); writeln; end; end; end. /************************************************************** Problem: 2012 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/