ll@t;
rep(t){
	ll@n,@a[n];
	ll b=ll_inf,c=-b,d=b,e=c,f=0;
	rep(i,n){
		ll v=a[i];
		b<?=v;
		c>?=v;
		if(v>0){
			d<?=v;
		}
		if(v<0){
			e>?=v;
		}
		if(v==0){
			f=1;
		}
	}
	if(f){
		wt(0);
	}else if(b>0||c<0){
		wt(b*c);
	}else{
		wt(d*e);
	}
}