A027894 Divisors of 9999.
1, 3, 9, 11, 33, 99, 101, 303, 909, 1111, 3333, 9999
Offset: 1
Programs
-
Maple
with(numtheory): divisors(9999); # Wesley Ivan Hurt, Jul 08 2014
-
Mathematica
Divisors[9999] (* Wesley Ivan Hurt, Jul 08 2014 *)
-
PARI
divisors(9999) \\ Michel Marcus, Jul 08 2014
-
PARI
fordiv(9999, d, print1(d, ", ")) \\ Michel Marcus, Jul 08 2014