Var n,x:integer;
begin
 read(n);
 if n mod 3 = 0 then
  begin
  n := n div 3;
  for x := 1 to n do
   if n mod x = 0 then
    write(3*x, )
  end
 else
  write(Not found)
end.