Ребяяят Особенности третьего «информационного прорыва»?

#include <iostream>#include <vector>using namespace std;int main() { int b, d; d = 1; vector <int> a(15); for (b = 0; b < 15; b++) { cin >> a[b]; } for (b = 0; b < 15; b++) { if (a[b] % 2 == 0) { d = a[b] * d; } } cout << d; system("pause"); return 0; }

Алгоритм же элементарный: тупо перебираешь массив с конца, проверяя знак каждого элемента. Вот код:

ОТДЕЛ Задание+;

ПЕР
  x: РЯД 100 ИЗ ЦЕЛ;
  сч, послПолож: ЦЕЛ;

УКАЗ
  послПолож := -1;
  сч := РАЗМЕР(x) - 1;
  ПОВТОРЯТЬ
    ЕСЛИ x[сч] > 0 ТО послПолож := сч КОН;
    УМЕНЬШИТЬ(сч)
  ДО послПолож # -1 ИЛИ сч < 0

КОН Задание.

Тут два варианта 1 и 3