Программа выполняется в Паскале! Составьте программу для решения следующей задачи:Дядюшка подарил своему племяннику на первый день рождения 1 доллар. В каждый следующий день рождения он удваивал свой подарок и прибавлял к нему...
Программа выполняется в Паскале! Составьте программу для решения следующей задачи:Дядюшка подарил своему племяннику на первый день рождения 1 доллар. В каждый следующий день рождения он удваивал свой подарок и прибавлял к нему столько долларов, сколько лет исполнилось его племяннику. Определите, к какому дню рождения сумма превысит 100 долларов? Помогите плииз.
Гость
Ответ(ы) на вопрос:
Гостьvar money,n,count:integer;
begin
money:=1;
n:=0;
while money < 100 do
begin
money:= money*2+n;
n:=n+1;
count:=count+1;
end;
writeln(count);
end.
Не нашли ответ?
Похожие вопросы