Вопрос, который вызвал трудности

Просуммировать первые n элементов геометрической прогрессии (2) (не пользуясь формулой для суммы первых n членов прогрессии).

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

vаг N,I:   0. .МахInt;
А,S:   Rеаl;
Begin
Write (‘N=’);
Readln(N);
А:=1;
S:=A;
For I:=2  То N Do
Begin
А:=2*А;
S:=S+A;
End;
Writeln (‘Сумма равна‘,S:6:0);
End.