в массиве чисел z1, z2, ..., z200 найти произведение чисел z5, z10, ..., z200.

#include <iostream>

#include <vector>

using namespace std;

signed main(){

   const int n = 200;

   int ans = 1;

   vector<int> a(n+1);

   for(int i = 1; i <= n; i++){

       cin >> a[i];

       if(i % 5 == 0) ans *= a[i];

   }

   cout << ans;

}

PascalABC.NETbegin var z := ArrRandom(200, 1, 50); z.Println; z[4::5].Aggregate(BigInteger.One,(p,x)->(p*x)).Printend.

Пример работы: