Найти натуральное число, которое в пять раз меньше суммы предшествующих - VB

Узнай цену своей работы

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

Найти натуральное число которое : 1) В пять раз меньше суммы предшествующих ему натуральных чисел; 2)Равно сумме предшествующих ему натуральных чисел. Используйте цикл с постусловием с ключевым словом Until.

Решение задачи: «Найти натуральное число, которое в пять раз меньше суммы предшествующих»

textual
Листинг программы
Sub Task()
 
    n& = 1
    S& = 1
    
    Do
    
       n& = n& + 1
       S& = S& + n&
       
    Loop Until 5 * n& = S& - n&
    
    Debug.Print n&
    
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

13   голосов , оценка 4.154 из 5
Похожие ответы