var ans: int :: 1

func main()
	var n: int :: cui@input().toInt(&)
	var factors: []int :: math@primeFactors(n)
	var factNums: dict<int, int> :: #dict<int, int>
	for i(0, ^factors - 1)
		do factNums.add(factors[i], factNums.get(factors[i], &) + 1)
	end for
	func f(key: int, value: int, c: kuin@Class): bool
		do @ans :* (key ^ (value + 1) - 1) / (key - 1)
		ret true
	end func
	do factNums.forEach(f, null)
	do cui@print("\{@ans}\n")
end func