Usando R (vedi) cerca il massimo numero di divisori che puņ avere un intero di 4 cifre, ed elencali.

n=0; for(i in 1:9999) {m=length(divisors(i)); if(m>n) {n=m; j=i}}; c(j,n) 
#  7560   64
divisors(7560)
#    1    2    3    4    5    6    7    8    9   10   12   14   15   18   20   21   24
#   27   28   30   35   36   40   42   45   54   56   60   63   70   72   84   90  105
#  108  120  126  135  140  168  180  189  210  216  252  270  280  315  360  378  420
#  504  540  630  756  840  945 1080 1260 1512 1890 2520 3780 7560
primes(7560)
#  2 2 2 3 3 3 5 7
# Non č l'unico numero a 4 cifre con 64 divisori:
for(i in 1:9999) {m=length(divisors(i)); if(m==64) print(i)} 
# 7560
# 9240
divisors(9240)
#    1    2    3    4    5    6    7    8   10   11   12   14   15   20   21   22   24
#   28   30   33   35   40   42   44   55   56   60   66   70   77   84   88  105  110
#  120  132  140  154  165  168  210  220  231  264  280  308  330  385  420  440  462
#  616  660  770  840  924 1155 1320 1540 1848 2310 3080 4620 9240
primes(9240)
#  2  2  2  3  5  7 11

Per trovare i divisori e i fattori primi di un numero puoi usare anche questi script.