var
   x,y,c,s:string;
   i,j,k,n,l:longint;
   o:integer;
begin
     readln(n);
     repeat
           readln(s);
           dec(n);
           c:=copy(s,pos(' ',s)+1,length(s)-pos(' ',s));
           delete(s,pos(' ',s),length(s)-pos(' ',s)+1);
           x:='';
           y:='';
           for i:=1 to length(s) do x:=x+s[length(s)-i+1];
           for i:=1 to length(c) do y:=y+c[length(c)-i+1];
           while x[1]='0'  do delete(x,1,1);
           while y[1]='0'  do delete(y,1,1);
           val(x,k,o);
           val(y,l,o);
           k:=k+l;
           str(k,s);
           c:='';
           for i:=1 to length(s) do c:=c+s[length(s)-i+1];
           while c[1]='0'  do delete(c,1,1);
           writeln(c);
     until n=0;
end.

• my qq:283271613 (0) zsjzfeng 2004-09-08 08:46:37