program for5;
var a,b,i,n:integer;
 begin
  read(a,b);
  For i:=b-1 downto a+1 do 
  begin
  WriteLn(i);
  inc(n);
  end;
  WriteLn(n);
  end.