Найти натуральное число, которое в пять раз меньше суммы предшествующих - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
