Дан линейный массив из 11 целых чисел найти произведение нечетных элементов
Дан линейный массив из 11 целых чисел найти произведение нечетных элементов
Гость
Ответ(ы) на вопрос:
Гостьfor i:=1 to 11 do
begin
if i mod 2 <> 0 then
Num := Num*Array[i]
end
Num - это произведение
Не нашли ответ?
Похожие вопросы