program zx000;

var

a:array[1..30] of char;

b,c,d:int64;

n,i,m:longint;

begin

for i:=1 to 30 do

a[i]:=chr(100);

read(b,c);

d:=b-c;

if d