gets;$<.map{eval"A,B="+_1.split*?,
x=[]
(c=A&-A;c/=2while c>B-A;x<<c;A+=c)while A<B
p x.size,*x}