Решаем задачи Абрамян на Кумире. For17

For17. Дано вещественное число $$A$$ и целое число $$N$$ ($$> 0$$). Используя один цикл, найти сумму $$1 + A + A^2 + A^3 + … + A^N$$.

Решение Дмитрий:

алг For17(арг вещ A, цел N, рез вещ S)
дано N>0
надо 
нач
 вещ C
 C:=1
 S:=1
 нц N раз 
  C:=C*A
  S:=S+C
 кц
кон

алг For17(арг вещ A, цел N, рез вещ S)

дано N>0

надо

нач

вещ C

C:=1

S:=1

нц N раз

C:=C*A

S:=S+C

кц

кон

Другие задачи из раздела For можно посмотреть здесь.