Мой богатый дядюшка подарил мне один доллар на мой первый день рождения. в каждый следующий день рождения он удваивал свой подарок, прибавлял к нему

Question

Информатика: Мой богатый дядюшка подарил мне один доллар на мой первый день рождения. в каждый следующий день рождения он удваивал свой подарок, прибавлял к нему столько долларов, сколько лет мне исполнялось, и полученную сумму дарил мне. напишите программу, подсчитывающую общую сумму всех денег, подаренных к -му дню рождения. формат входных данных на вход программе подается единственное число . это в паскале

stasleraz · Answer

Var  i,s,k,n:integer;begin  readln(n);  s:=0;k:=0;  for i:=1 to n do   begin    s:=2*s+i;    k:=k+s;   end; write( Дядюшка подарил ,k, долларов. );end....

Популярные вопросы