program expr;
var s,ss:string[255];


procedure Rekur(od:integer; var do_2:integer; var jeKrat,jePlus:boolean);
var ch,operPred,operZa:char;
    byloKrat,byloPlus,odstran,  shit:boolean;
pamet:integer;
begin
  jeKrat:=false; jePlus:=false; shit:=true;
  ch:=s[od]; operPred:='+'; operZa:='?'; do_2:=od;
{writeln(ch); } 
while (ch<>')') do
  begin
    case ch of
      '+','-':begin jePlus:=true; operPred:=ch; shit:=false; end;
      '*','/':begin jeKrat:=true; operPred:=ch; shit:=false; end;
      '(':begin
                pamet:=do_2;
{             writeln(' volam',do_2+1,' ');            } 
            Rekur(do_2+1,do_2, byloKrat,byloPlus);
            operZa:=s[do_2+1]; if operZa=')' then operZa:='+';
{            writeln(operZa);}
            odstran:=true;
            if (operPred='/') and (byloKrat or byloPlus) then
odstran:=false;
            if ((operPred='*')or(operPred='-')or(
               (operPred='+')and((operZa='*')or(operZa='/')))
               ) and byloPlus then odstran:=false;
{            if odstran then writeln('ostranim ',do_2);}
             if odstran then ss[do_2]:='#';
             if odstran then ss[pamet]:='#';
          end;
      
    end;
    inc(do_2); ch:=s[do_2];
  end;
  if shit then begin jeKrat:=byloKrat; jePlus:=byloPlus; end;
end;


var pomb1,pomb2:boolean;
  pom,n,i,j:integer;

begin
 s:='(a+b)*c';
 s:='(a+b)-(c-d)-(e/f)';
 readln(n);
 for i:=1 to n do
begin
 readln(s);
 ss:=s; s:=s+')';
 Rekur(1,pom,pomb1,pomb2);
 for j:=1 to length(ss) do
   if ss[j]<>'#' then write(s[j]);
 writeln
end;

end.