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

rgfheh rgfheh    1   09.03.2019 01:50    5

Ответы
89224717238 89224717238  24.05.2020 08:53

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. 

 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика