Предмет: Информатика,
автор: Aristarhova123
написать программу вычисления суммы n слагаемых вида: (k-1)3 где к=1,2,3... n
Ответы
Автор ответа:
0
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)
Dim k As Integer
Dim Summ As Integer
n = InputBox("Введите n")
For k = 1 To n
Summ += (k - 1) * 3
' c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535
Next
MsgBox(Summ)
Похожие вопросы
Предмет: Геометрия,
автор: Pyrska
Предмет: Русский язык,
автор: Аноним
Предмет: География,
автор: vikastepler1
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: efimova1149