##################
### Aufgabe 49 ###
##################

N <- 10000000

i <- 1:N
ci <- 1/i
cquer <- mean(ci)
sum((ci - cquer)^2) / max((ci - cquer)^2)

pi^2 / 6