Ответы
Ответ дал:
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)
Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад