Hogyan lehet kiszámítani egy megadott számsorozat első N elemének összegét?

Melyik része nem megy?

- Egy for ciklus felírása?

- Az összegzés?

- Vagy sorozat i. tagjának meghatározása?

Ettől még megbuksz:

var i, a, n, d, sum: integer;

begin

sum := 0; //Összeg

a := 1; //Első elem

d := 2; //Differencia

n := 7; //Hány elem

for i := 0 to n - 1 do Inc(sum, (i * d) + a );

WriteLn(sum);

ReadLn;

end.