Упражнение 21 нужно написать в visual basic, помогите кто сможет
прям срочно надо

Заполни ячейки A2, B2, C2Sub Calculate() 'Начало процедурыDim deposit As Integer 'величина вкладаDim period As Integer 'срок вкладаDim percent As Integer 'годовая процентная ставкаDim day_percent As Double 'ежедневная процентная ставкаDim profit As Double 'доходDim result As Double 'итогdeposit = Cells(2, 1).Value 'присваиваем величине вклада значение ячейки А2period = Cells(2, 2).Value 'присваиваем сроку вклада значение ячейки B2percent = Cells(2, 3).Value 'присваиваем годовой процентной ставке значение ячейки C2day_percent = period * percent / 365 'ежедневная процентная ставка = срок вклада (умножаем) на годовую процентную ставку и (делим) на 365 днейprofit = deposit * day_percent / 100 'доход = величина вклада (умножаем) на ежедневную процентную ставку и (делим) на 100%result = deposit + profit 'Итог = величина начального вклада (плюс) доходCells(6, 3).Value = profit 'заносим доход в ячейку C6Cells(7, 3).Value = result 'заносим итог в ячейку C7End Sub 'Конец процедуры