var s,a,b:int64;

i,j:longint;

ln:integer;

st:ansistring;

begin

read(a,b);

if (a