Написать программу вычисления суммы 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)
Не нашли ответ?
Ответить на вопрос
Похожие вопросы