Любое произведение чисел будет четным, если оно содержит хотя бы оин четный сомножитель, поэтому задача сводится к определению того, есть ли в массиве хоть один четный элемент с нечетным порядковым номером. Почему просто не попытаться перемножить эти элементы? Например потому, что максимальное целое значение в компьютерной математике ограничено количеством байт, отводимых для представления данных такого типа и редко превышает 2³². А представление с плавающей точкой - приближенное и проверять четность для подобных чисел часто оказывается бессмысленным.
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016 begin var a:=ArrRandom(10,-15,15); a.Println; if a.Where((x,i)->i.IsEven).Any(x->x.IsEven) then Writeln('Четное') else Writeln('Нечетное') end.
Пояснения. 1. var a:=ArrRandom(10,-15,15); - описывается динамический массив "а", который создается и заполняется данными. 2. a.Println; - вывод элементов массива. 3. a.Where((x,i)->i.IsEven) выделяет из массива "а" элементы, у которых индекс четный (массив "а" - динамический и его элементы индексируются от нуля, поэтому элементы с нечетным порядковым номером имеют четные индексы). Полученная последовательность элементов посредством Any(x->x.IsEven) проверяется на наличие хотя бы одного элемента с четным значением. Проверка возвращает логическое значение, на основе которого формируется вывод.
Не знаю, какой язык ты используешь, так что объясню на псевдокоде:
1. Создадим массив a[25] 2. Используем цикл For для заполнения случайным числом каждый элемент массива. Что-то вроде этого: for i = 1 to a.length, где length - длина массива a[i] = random(-13, 37), где random - функция случайных чисел в используемом тобой языке
3. Окей, массив заполнили. Теперь нужно вывести элементы с четным индексом. И вновь используем for. Первый вариант:
for i = 1 to a.length step 2 print a[i]
Цикл с шагом 2. Мы пропускаем нечетные числа. Можно и поставить условие для проверки:
for i = 1 to a.length if mod(i, 2) == 0 then print a[i], где mod - функция вычисления остатка от деления или любая другая функция проверки четности
import random
s = [random.randint(-50,50) for i in range(100)]
flag = False
print("Номера отрицательных элементов:", end=" ")
for i in range(len(s)):
if s[i] < 0:
print(i, end=" ")
flag = True
if not flag:
print("Нет отрицательных элементов.")
print()
print()
print(s)
Вывод:Номера отрицательных элементов: 1 2 3 7 9 14 15 16 19 20 25 26 28 33 34 35 37 38 41 46 48 49 50 51 52 54 55 56 60 61 66 67 70 72 74 75 79 80 81 82 87 88 89 90 92 94 96
Последовательность чисел:
[30, -44, -14, -20, 48, 10, 32, -8, 46, -27, 1, 1, 5, 3, -23, -22, -41, 28, 29, -4, -34, 46, 34, 6, 7, -45, -17, 45, -27, 5, 4 6, 12, 44, -28, -29, -34, 27, -39, -18, 16, 21, -5, 14, 21, 24, 30, -44, 37, -18, -38, -36, -15, -43, 23, -49, -11, -32, 36, 5 , 17, -12, -30, 26, 14, 26, 32, -31, -44, 42, 48, -14, 37, -45, 10, -34, -22, 48, 28, 10, -23, -6, -35, -38, 1, 33, 35, 50, -1 8, -2, -29, -20, 33, -15, 3, -27, 6, -50, 6, 25, 5]