Freepascal. Serie alterna. Problema

[ederraederra]

Buenos días,

os agradecería que, por favor, me ayudarais a solucionar una serie alterna finita del tipo S= 1/1 - 1/2 + 1/3 - 1/4 + 1/5 -… ± 1/n, siendo n un número elegido por el usuario.

El problema radica en la alternancia del signo, ya que partiendo de un programa correcto que calcula una serie armónica S= 1/1 + 1/2 + 1/3 + 1/4 + 1/5 +… + 1/n no he logrado implementar dicho cambio


Un saludo

[Heimish2000]

Es muy sencillo, en el for que hagas comprueba si el contador es par o impar.

Te lo pongo en pseudocodigo/C

Código C:

for (int i = 1; i<=n; i++)
{
if (i%2==0)
{
S -= 1/i;
}
else
{
S += 1/i;
}
 
}
 

[ederraederra]

Gracias Heimish2000, has sido de gran ayuda.

Un saludo