Дано целое число N (>0) и число А. Найти сумму по формуле Р=1+ А + А^2+A^3+… A^N В паскале.…

Question

52

Дано целое число N (>0) и число А. Найти сумму по формуле Р=1+ А + А^2+A^3+… A^N В паскале. Помогите! Оченьсрочно!

в избранное ссылка

Знаете ответ?

pblar · Accepted Answer

96

pblar

15 февраля 2024

Program t1; Var i,k,a,n,p: integer; BeginK: =a; P: =1; For i=1 to n doBeginP: =p+k; K: =k*a; End; Write (p); End.

комментировать

в избранное ссылка отблагодарить