Написать программу вычисления суммы n слагаемых видаk-1) 3 где к=1,2,3… n

Dim n As IntegerDim k As Integer Dim Summ As Integern=InputBox ("Введите n") For k=1 To n Summ+=(k — 1)*3 ' c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535NextMsgBox (Summ)