var i,j,n,k:integer;
begin
writeln('n-?');
read(n);
writeln('k-?');
read(k);
for i:=1 to n do begin
for j:=1 to k do begin
if (6*j+1)*(6*j+1)=i then writeln(i,' '); {writeln(i,' ',j);}
end;
end;
end.