Написать программу, определяющую номер последней прочитанной страницы

Ученица, читая очередной французский роман, подсчитала сумму номеров прочитанных страниц. Обозначили эту сумму Q. Написать программу, определяющую номер последней прочитанной страницы.

input"vvedite summu ",q
do
n=n+1
q=q-n
loop until q<=0
print n

автор: кот Бегемот