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

Есть ответ
18.12.2022
94

Ответ


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. 

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.