Составить программу, которая формирует
массив из 7 случайных целых чисел, принадлежащих
промежутку [1; 5], и вычисляет произведение нечетных чисел.
Сформируем массив случайных чисел на указанном
промежутке. Вычисленное произведение будем помещать в
переменную Р. Начальное значение Р:=1.
Умножать Р на значение очередного элемента будем только
на тех шагах цикла for,
где выполняется условие A[i] mod 2 = 1.
(В паскале) даю 90 баллов
Answers & Comments
begin
//PascalABC.NET v3.5.1
SeqRandom(7, 1, 5).Where( x -> (x mod 2) <> 0).Product.Print();
end.