program q222118069;
type
TDynArray = array of Integer ;
function Max( a: TDynArray) : Integer ;
var
i: Integer ;
begin
Max : = Low( a) ;
for i : = Low( a) to High( a) do
if a[ i] > a[ Max] then
Max : = i;
Max : = a[ Max] ;
end ;
procedure RandAndPrint( var a: TDynArray; n: Integer ) ;
var
i: Integer ;
begin
SetLength( a, n) ;
for i : = Low( a) to High( a) do
begin
a[ i] : = Random( 101 ) - 50 ;
Write ( a[ i] : 4 ) ;
end ;
WriteLn ;
end ;
var
n, m: Integer ;
a, b: TDynArray;
begin
Randomize;
ReadLn ( n, m) ;
RandAndPrint( a, n) ;
RandAndPrint( b, m) ;
if Max( a) > Max( b) then
WriteLn ( Max( a) , '(A)' )
else
WriteLn ( Max( b) , '(B)' ) ;
end .
cHJvZ3JhbSBxMjIyMTE4MDY5Owp0eXBlCiAgVER5bkFycmF5ID0gYXJyYXkgb2YgSW50ZWdlcjsKCmZ1bmN0aW9uIE1heChhOiBURHluQXJyYXkpOiBJbnRlZ2VyOwp2YXIKICBpOiBJbnRlZ2VyOwpiZWdpbgogIE1heCA6PSBMb3coYSk7CiAgZm9yIGkgOj0gTG93KGEpIHRvIEhpZ2goYSkgZG8KICAgIGlmIGFbaV0gPiBhW01heF0gdGhlbgogICAgICBNYXggOj0gaTsKICBNYXggOj0gYVtNYXhdOwplbmQ7Cgpwcm9jZWR1cmUgUmFuZEFuZFByaW50KHZhciBhOiBURHluQXJyYXk7IG46IEludGVnZXIpOwp2YXIKICBpOiBJbnRlZ2VyOwpiZWdpbgogIFNldExlbmd0aChhLCBuKTsKICBmb3IgaSA6PSBMb3coYSkgdG8gSGlnaChhKSBkbwogIGJlZ2luCiAgICBhW2ldIDo9IFJhbmRvbSgxMDEpIC0gNTA7CiAgICBXcml0ZShhW2ldOjQpOwogIGVuZDsKICBXcml0ZUxuOwplbmQ7Cgp2YXIKICBuLCBtOiBJbnRlZ2VyOwogIGEsIGI6IFREeW5BcnJheTsKYmVnaW4KICBSYW5kb21pemU7CiAgUmVhZExuKG4sIG0pOwogIFJhbmRBbmRQcmludChhLCBuKTsKICBSYW5kQW5kUHJpbnQoYiwgbSk7CiAgaWYgTWF4KGEpID4gTWF4KGIpIHRoZW4KICAgIFdyaXRlTG4oTWF4KGEpLCAnKEEpJykKICBlbHNlCiAgICBXcml0ZUxuKE1heChiKSwgJyhCKScpOwplbmQu