Составьте программу, которая формирует массив из шестнадцати случайных целых чисел от -20 до 20 и: 1) находит индексы чётных элементов 2) подсчитывает количество отрицательных элементов

#include <iostream>
#include <cstdlib>
#include <ctime>
using namespace std;
int main()
{
int chet=0;
mas[16];
int i;
srand(time(NULL));
for(i=0; i<16; i++)
mas[i]=rand()%41+(-20);
for(i=0; i<16; i++)
{
if(mas[i]%2==0)
{
cout << i+1 <<' ';
}
if(mas[i]<0)
chet++;
}
cout << '\n' << chet << '\n';
system("pause>>null");
return 0;
}

Program r1; var A:array [1..16] of integer i:integerBegin for i:=1 to 16 do A[i]:random(41)-20; for i:= 1 to 16 do  if A[i] mod 2 = 0 then    writeln(' i,' ');end.