Написать фрагмент программы на VBA для нахождения произведения чисел с шагом 2 на интервале от -10 до 10 используя For-Next, Do-Loop While с предпосылкой и Do-Loop Until с послесловием

Dim i as Integer
Dim Summ as Integer


Summ=1

For i=-10 to 10 Step 2
Summ=Summ*i
Next

i=-10
Summ=1

Do
     summ = summ * i
     i = i + 2       
Loop While i <> 12



i=-10
Summ=1

Do
     summ = summ * i
     i = i + 2        
Loop Until i = 12

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.