Татьяна Ларина, читая очередной французский роман,подсчитал сумму номеров прочитанных...

Question

Татьяна Ларина, читая очередной французский роман,подсчитал сумму номеров прочитанных страниц. Составить алгоритм, определяющий номер последней прочитанной страницы.

Comments

Просто прогрессию не очень знаю

---

В Интернете посмотрите, если забыли

---

Первый член единица, разность - единица.... все прсто

---

Корень из восьми сумм, увеличенных на единицу. вычесть из единицы и все поделить надвое.

---

*вычесть единицу, а не из единицы

---

(sqrt(8*s+1)-1) / 2

---

Действительно, спасибо

---

Это и есть ответ

---

А прост оя всегда до того, как код писать, думаю, надо ли его вообще писать

---

Да, думаю стоит завести такую привычку

Answer 1

Костыль-код:

var n,i,s:longint;
begin
read(n);
s:=n;
i:=1;
while s - i > 0 do
begin
s:=s - i;
i:=i + 1;
end;
writeln(i);
end.

Хороший код:

var n:longint;
begin
read(n);
writeln((sqrt(8*n+1)-1)/2);
end.