program oneclue
integer::k,x,count
integer,allocatable::a(:)
read*,k,x
allocate(a(k*2-1))
count=x-k
do i=1,(k*2-1)
count=count+1
a(i)=count
end do
print*, a                                                                                            
end program oneclue