program xy;
var s1,s2,p:string[3];b1,b2,g,i:integer;
begin
 readln(s1,s2);
 p:='';
 for i:=3 downto 1 do
  p:=p+s1[i];
 val(p,b1,g);
 p:='';
 for i:=3 downto 1 do
  p:=p+s2[i];
 val(p,b2,g);
 if b2>b1 then writeln(b2)
 else writeln(b1);
end.