program alex;
var f:text;
    a:array[1..150]of longint;
    i,n,k,j,s,h,x,y,z:longint;
    e:boolean;
begin
assign(f,'loto.in');reset(f);
readln(f,n,k);
for i:=1 to n do
    read(f,a[i]);
close(f);
e:=false;
for i:=1 to n-5 do
    begin
    for j:=i+1 to n-4 do
        begin
        for h:=j+1 to n-3 do
            begin
            for x:=h+1 to n-2 do
                begin
                for y:=x+1 to n-1 do
                    begin
                    for z:=y+1 to n do
                        begin
                        s:=s+a[i]+a[j]+a[h]+a[x]+a[y]+a[z];
                        if s=k then begin
                                    e:=true;
                                    break;
                                    end;
                        end;
                    if e=true then break;
                    end;
                if e=true then break;
                end;
            if e=true then break;
            end;
        if e=true then break;
        end;
        if e=true then break;
        end;
assign(f,'loto.out');rewrite(f);
if e=true then writeln(f,a[i],' ',a[j],' ',a[h],' ',a[x],' ',a[y],' ',a[z])
          else writeln(f,-1);
close(f);
end.