написать программу определяющую сумму первых 10 членов последовательности, an=5n-1

Вопрос школьника по предмету Информатика

написать программу определяющую сумму первых 10 членов последовательности, an=5n-1

Ответ учителя по предмету Информатика

Var S,n:integer;

Begin

S:=0;

For n:= 1 to 10 do

    S:=S+5*n-1;

WriteLn(‘S = ‘,S);

End.

Результат работы программы:

S = 265