Ответы
Ответ дал:
0
Sub Zadanie()
n = CInt(InputBox("n ="))
y = 1
for i = 1 to n
y = y * (2 * i - 1)
next
MsgBox y
End Sub
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
9 лет назад