Дано вещественное число А и целое число N ( больше O) используя один цикл найти сумму. 1+ А+ А ( в кд.) + А (в кубе) + . . . . + А ( в N)

Question

Дано вещественное число А и целое число N ( больше O) используя один цикл найти сумму. 1+ А+ А ( в кд.) + А (в кубе) + . . . . + А ( в N)

Дано вещественное число А и целое число N (>O) используя один цикл найти сумму. 1+ А+ А ( в кд.) + А (в кубе) + . . . . + А ( в N)

Гость

Ответ(ы) на вопрос:

Accepted Answer

program dl9_meru3; var a,s:real; n,i:integer begin writeln ('Vvedit A i N(>0)'); readln (a,n); s:=0; a:=a+1; for i:=2 to n do begin s:=s+a; a:=a*a; end; writeln ('suma=',s); readln end.