Question

написать программу вычисляющую произведение четных элементов массива D, размерностью 15, Элементы массива-числа промежутка [0, 50]​

Answer 1

Программа:

Pascal:

var

 D: array[1..15] of integer;

 pr, i: integer;

begin

 pr := 1;

 for i := 1 to 15 do begin

   D[i] := random(0, 50);

   if D[i] mod 2 = 0 then pr *= D[i];

 end;

 writeln(D, #10, 'Произведение чётных элементов: ', pr);

end.

Answer 2

include<vector>

int main()

{

int mas[15] = [сюда вводишь массив через запятую];

vector<int> mass;

for(int i =0;i<15;i++){

if (mas[i]%2)

mass.push_back(mas[i])

}

return 0;

}

Answer 3

Чтобы написать программу, которая вычисляет произведение четных элементов массива, нужно выполнить следующие шаги:

1. Создать массив `d` с размерностью 15 и заполнить его случайными числами в диапазоне от 0 до 50. Это можно сделать, используя функцию `random.randint` из модуля `random`:

import random

d = [random.randint(0, 50) for _ in range(15)]

2. Инициализировать переменную `product` со значением 1. Эта переменная будет хранить произведение четных элементов массива.

product = 1

3. Пройти в цикле по элементам массива `d` и проверить, является ли текущий элемент четным числом. Если элемент четный, умножить его на значение `product` и присвоить результат переменной `product`.

for num in d:
    if num % 2 == 0:
        product *= num

4. Вывести в консоль значение переменной `product`.

print("Произведение четных элементов массива:", product)

Полный код программы:

import random

d = [random.randint(0, 50) for _ in range(15)]
product = 1

for num in d:
    if num % 2 == 0:
        product *= num

print("Произведение четных элементов массива:", product)

После выполнения программы будет выведено произведение всех четных элементов массива `d`.