Татьяна Ларина, читая очередной французский роман, подсчитала сумму номеров прочитанных страниц. Обозначили эту сумму Q. Написать программу, определяющую номер последней прочитанной страницы — QBasic(Бейсик) — Справочник разработчика. Приемная комиссия

INPUT "vvedite summu ", q
DO
    n = n + 1
    q = q - n
LOOP UNTIL q <= 0
PRINT n

Тестирование выполнено в программе QB64 ( Скачать )