#include<iostream>
using namespace std;
signed main() {
setlocale(LC_ALL, "Rus");
int N;
cin >> N;
int* a = new int[N];
for (int i = 0; i < N; i++)
{
cin >> a[i];
}
//выводим индексы четных элементов
cout << "Номера тех элементов, значения которых чётны: ";
for (int i = 0; i < N; i++) {
if (a[i] % 2 == 0)
cout << i << " ";
}
//выводим весь массив
cout << "\nМассив: ";
for (int i = 0; i < N; i++)
cout << a[i] << " ";
return 0;
}
a, sum, pr: integer;
begin
pr := 1;
for a := 1 to 150 do
if a mod 5 = 0 then
begin
sum := sum + a;
pr := pr * a;
end ;
writeln('Сумма кратных 5 = ', sum, #10, 'Произведение кратных 5 = ', pr);
end.