program farfurii;
var
i,n,k,x:longint;
f1,f2:text;
begin
assign (f1,'farfurii.in');
assign (f2,'farfurii.out');
reset (f1);
rewrite (f2);
readln (f1,n,k);
i:=1;
while (n-i)*(n-i-1) div 2>=k do begin write (f2,i,' '); i:=i+1; end;
write (f2,i+k-(n-i)*(n-i-1) div 2,' ');
while n>=i do begin
if n<>i+k-(n-i)*(n-i-1) div 2 then write (f2,n,' ');
n:=n-1;
end;
close (f1);
close (f2);
end.