uses crt;
var n,m,i: longint;
    fi,fo: text;
function nt(n: longint): boolean;
var i: longint;
begin
    nt:=true;
    if n<=1 then nt:=false;
    if nt=true then for i:=1 to trunc(sqrt(n)) do if n mod i = 0 then begin
        nt:=false;
        exit();
    end;
end;
function dx(n: longint): boolean;
var s,p: longint;
begin
    p:=n; s:=0;
    while p>0 do begin
        s:=s*10+p mod 10;
        p:=p div 10;
    end;
    if s=n then dx:=true else dx:=false;
end;
begin
    assign(fi,'NTDX4.INP'); reset(fi);
    assign(fo,'NTDX4.OUT'); reset(fo);
    readln(fi,n,m);
    if n>m then begin for i:=n to m do if (nt(i)) and (dx(i)) then write(fo,i,' ') end else for i:=m to n do if (nt(i)) and (dx(i)) then write(fo,i,' ');
    close(fi);
    close(fo);
end.