52

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

17 марта 2023

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

категория: информатика

96

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.

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

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...