Question

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

Answer 1

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 2

Программа:

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.