/MERGENUM - Ghép số

              Uses Crt;
        Var  a,b,i,j:longint;  s1,s2,temp,smax,smin:string;
        Begin
            readln(a,b);
            str(a,s1); str(b,s2);
        
            smax:='';
        
            i:=1; j:=1;
            while (s1<>'') and (s2<>'') do
             begin
                 if (s1+s2>s2+s1) and (s1[i]>=s2[j]) then
                  begin
                      smax:=smax+s1[i];
                      //inc(i);
                      delete(s1,1,1);
                  end
                  else
                  begin
                      smax:=smax+s2[j];
                      //inc(j);
                      delete(s2,1,1);
                  end;
             end;
             smax:=smax+s1+s2;
            // writeln(smax);
        
             s1:=''; s2:='';
             str(a,s1); str(b,s2); i:=1; j:=1;
             smin:='';
             while (s1<>'') and (s2<>'') do
              begin
                  if (s1+s2<s2+s1) and (s1[i]<=s2[j]) then
                   begin
                       smin:=smin+s1[i];
                       //inc(i);
                       delete(s1,1,1);
                   end
                   else
                   begin
                       smin:=smin+s2[j];
                       //inc(j);
                       delete(s2,1,1);
                   end;
              end;
             // writeln(smin);
        
             smin:=smin+s1+s2;
             writeln(smin); writeln(smax);
             readln;
        End.