Сколько чисел нужно взять в последовательности 1+2+3+4+…, чтобы получить число, большее чем N? - VB

Формулировка задачи:

Сколько чисел нужно взять в последовательности 1+2+3+4+…, чтобы получить число, большее чем N?

Решение задачи: «Сколько чисел нужно взять в последовательности 1+2+3+4+…, чтобы получить число, большее чем N?»

textual
                            Листинг программы 
                        
Dim n As Long
n = InputBox("Введите N > 0")
MsgBox Int((1 + Sqr(1 + 8 * n)) / 2) & " чисел нужно взять в последовательности 1+2+3+4+…, чтобы получить число, большее чем " & n

Оцени полезность:

10 голосов , оценка 3.8 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы