var
N, M, prov: longint;
begin
readln(N);
readln(M);
if N < M then
prov := N;
while prov <= M do
if prov mod 7 = 0 then
writeln(prov);
inc(prov);
end;
end
else
prov := M;
while prov <= N do
end.