WMA
DivisorSum
DivisorSum[20, # &]
DivisorSum[20, #^2 &]
See also DivisorSigma and Divisors.
DivisorSigma