var i,n,m,max:longword;
f:text;
function ngto(n:longword):boolean;
var i:longword;
begin
if n<2 then exit(false);
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then exit(false);
exit(true);
end;
function sum(n:longword):word;
var t:word;
begin
t:=0;
while n<>0 do
begin
t:=t+(n mod 10);
n:=n div 10;
end;
sum:=t;
end;
begin
assign(f,'D:\snt.out');rewrite(f);
readln(n,m);
writeln(f,n,' ',m);
max:=0;
for i:=n to m do
begin
if ngto(i)=true then
begin
write(f,i,' ');
if sum(max)<sum(i) then
max:=i;
end;
end;
write(f,#13#10,max);
close(f);
end.