Untitled


var a, b: integer;
    p:boolean;
    sum1, sum2: integer;
begin
     //Вводим числа
     read(a);
     read(b);
     writeln();
     p:=true;
     //Узнаем сумму цифр
     while a<>0 do
           begin
           sum1:=sum1 + a mod 10;
           a:=a div 10;
           end;
     while b<>0 do
           begin
           sum2:=sum2 + b mod 10;
           b:=b div 10;
           end;
     //Сравниваем суммы цифр
     //Если суммы цифр обоих чисел равны
     if sum1=sum2 then begin
                       p:=false;
                       writeln('A = B');
                       writeln(sum1);
                       end;
     //Если неравны
     if p=true then
        if sum1>sum2 then begin
                          writeln('A > B');
                          writeln(sum1);
                          end
                          else begin
                          writeln('B > A');
                          writeln(sum2);
                          end;
end.