Вычислить сумму последовательности - VBA
Формулировка задачи:
3.
Вычислить сумму последовательности, общий член которой ((k+1)(k+2))/k+3, где k=1, 2, 3, ...), пока результат не превысит наперед заданного числа N.Решение задачи: «Вычислить сумму последовательности»
textual
Листинг программы
Dim C As Single, X As Single, K As Single
C = InputBox("Enter max value")
X = 0
Do While X <= C
K = K + 1
X = ((K + 1) * (K + 2)) / K + 3
Debug.Print X
DoEvents
Loop
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д