const fi='DAYCON.INP';
fo='DAYCON.OUT';
var a:array[0..105] of longword;
i,n,k,j:byte;
t,s:longword;
kq:boolean;
f1,f2:text;
begin
assign(f1,fi);reset(f1);
assign(f2,fo);rewrite(f2);
readln(f1,n,t);
for i:=1 to n do read(f1,a[i]);
for i:=1 to n do
begin
j:=i;
s:=0;
while (s<t) and (j<=n) do
begin
s:=s+a[j];
inc(j);
end;
if t=s then
begin
kq:=true;
for k:=i to j-1 do write(f2,a[k],' ');
end;
if kq=true then break;
end;
close(f1);close(f2);
end.
