Somme di successioni geometriche

Il programma calcola le somme [math]S_n[/math] dei primi n addendi della successione geometrica [math]\{1,\,r,\,r^2, \dots, r^n\}[/math]