Один богатый дядюшка подарил племяннику 1 доллар в его первый день рождения. В каждый следующий день рождения он удваивал подарок и прибавлял к нему столько долларов, сколько лет исполнялось мальчику. Сосчитать, сколько подаренных денег накопиться к 18-летию мальчика

Question

Амфилохий

6 октября, 14:46

+2

Ответы (1)

Знаете ответ на вопрос?

Аня · Answer 1

Var i, p, s:integer;

begin

p:=1; s:=1;

for i:=2 to 18 do

begin

p:=p*2;

s:=s+p+i;

end;

writeln ('s = ', s) ;

end.

Результат:

s = 262313