Написать программу вычисления суммы n слагаемых вида: (k-1)3 где к=1,2,3... n
Написать программу вычисления суммы n слагаемых вида: (k-1)3 где к=1,2,3... n
Ответ(ы) на вопрос:
Dim n As Integer
Dim k As Integer
Dim Summ As Integer
n = InputBox("Введите n")
For k = 1 To n
Summ += (k - 1) * 3
' c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535
Next
MsgBox(Summ)
Не нашли ответ?
Похожие вопросы