Phạm Đỗ Thắng

const
        fi='DQBN22.inp';
        fo='DQBN22.out';
var
        a,x:array[-5..100007] of longint;
        n,i:longint;
        ma:int64;
        f,g:text;
function prime(i:longint):boolean;
var
        j:longint;
begin
        if i<2 then exit(false);
        for j:=2 to trunc(sqrt(i)) do if i mod j=0 then exit(false);
        exit(true);
end;
procedure xuat;
var
        j:longint;sum:int64;
begin
        sum:=0;
        for j:=1 to n do if x[j]=1 then sum:=sum+a[j];
        if (prime(sum)=true) then
        begin
                for j:=1 to n do if x[j]=1 then write(g,a[j],' ');
                writeln(g);
        end;
end;
procedure try(i:longint);
var
        j:longint;
begin
        for j:=0 to 1 do
        begin
                x[i]:=j;
                if i=n then xuat else try(i+1);
        end;
end;
begin
        assign(f,fi);reset(f);
        assign(g,fo);rewrite(g);
        readln(f,n);
        for i:=1 to n do read(f,a[i]);
        try(1);
        close(f);close(g);
end.