var a,b:array[1..1000] of integer; pom,i,j,t:INTEGER; BEGIN readln(t); for i:=1 to t do readln(a[i],b[i]); for i:=1 to t do begin pom:=a[i]; for j:=1 to b[i]-1 do a[i]:=(a[i]*pom); writeln(a[i]); end; END.