Написать программу, определяющую, к какому дню рождения сумма подарка превысит 100$.

@Smile_Love · Регистрация: 14.03.2013

Author24 — интернет-сервис помощи студентам

Богатый дядюшка подарил племяннику 1$ к первому дню рождения. В каждый следующий день рождения он удваивал свой подарок и прибавлял к нему столько долларов, сколько исполнилось лет. Написать программу, определяющую, к какому дню рождения сумма подарка превысит 100$. Заранее спасибо за помощ

@ZET · 19.03.2013, 09:34

Pascal

var
    n:=100;
    i, n: integer;
 
begin
 
 
    for i := 1 to n do
if i>100 then write (i) else i:=sqr(i)+1;
 
        write (i);
 
readln
end.

вроде так

@Chernenko_Tanya · 19.03.2013, 11:13

Сообщение от ZET

вроде так

Неверное решение.

@Smile_Love · 19.03.2013, 15:40 **[ТС]**

он ошибку выдает

@Smile_Love 0 / 0 / 0 Регистрация: 14.03.2013 Сообщений: 8
		1
	Написать программу, определяющую, к какому дню рождения сумма подарка превысит 100$. 19.03.2013, 08:05. Показов 5884. Ответов 3 Метки нет (Все метки) Богатый дядюшка подарил племяннику 1$ к первому дню рождения. В каждый следующий день рождения он удваивал свой подарок и прибавлял к нему столько долларов, сколько исполнилось лет. Написать программу, определяющую, к какому дню рождения сумма подарка превысит 100$. Заранее спасибо за помощ 0

@Chernenko_Tanya 3 / 3 / 0 Регистрация: 28.02.2013 Сообщений: 15
	19.03.2013, 11:13	3
	Сообщение от ZET вроде так Неверное решение. 0

@Smile_Love 0 / 0 / 0 Регистрация: 14.03.2013 Сообщений: 8
	19.03.2013, 15:40 [ТС]	4
	он ошибку выдает 0