Дан линейный массив из 11 целых чисел найти произведение нечетных элементов

Question

Дан линейный массив из 11 целых чисел найти произведение нечетных элементов

Answer 1

For i:=1 to 11 do
begin
   if i mod 2 <> 0 then
   Num := Num*Array[i]
end
Num - это произведение

Comments

забыл сказать, что это паскаль