1) заполните массив случайными числами в диапазоне 20..100 и подсчитайте отдельно число чётных и нечётных элементов. 2) заполните массив случайными числами в диапазоне 0..100 и подсчитайте отдельно среднее значение всех элементов, которые < 50, и среднее значение всех элементов, которые ≥50.

#include <iostream>#include <time.h>#include <stdio.h>#include <stdlib.h>#define max 100using namespace std;/* run this program using the console pauser or add your own getch, system("pause") or input loop */
int main(int argc, char** argv) { srand(time(NULL)); int n , Chet = 0 ,notChet = 0 ,a[max]; cout<<"Size : "; cin>>n; for(int i = 0; i < n; i++) { a[i] = rand()%120+20; cout<<a[i]<<endl; if (a[i] %2 == 0) Chet++; else notChet++; } cout<<"Chet = "<<Chet<<", NotChet = "<<notChet; return 0;}

1)
typedef size_t uint32; 
mt19937 gen{ random_device()() }; 
uniform_int_distribution<uint32> uid(20, 100); 
const uint32 N = 10;     
int main() 
{
     uint32 arr[N], pos{0}, neg{0};
     for (uint32 i = 0; i < N; ++i) {
         arr[i] = uid(gen);
         cout << arr[i] << " ";
         if (arr[i] % 2 == 0) ++pos;
         else ++neg;
     }
     cout << endl << pos << "/" << neg << endl;
     system("pause"); 
}
2)
typedef size_t uint32; 
mt19937 gen{ random_device()() }; 
uniform_int_distribution<uint32> uid(0, 100); 
const uint32 N = 10;     
int main() 
{
     uint32 arr[N], lf{ 0 }, hf{ 0 }, sum1{ 0 }, sum2{ 0 };
     for (uint32 i = 0; i < N; ++i) {
         arr[i] = uid(gen);
         cout << arr[i] << " ";
         if (arr[i] >= 50) {
             ++lf;
             sum1 += arr[i];
         } else {
             ++hf;
             sum2 += arr[i];
         }
     }
     cout << endl << sum1 / lf << "/" << sum2 / hf << endl;
     system("pause"); 
}

1. программа это описание на формальном языке понятном компьютеру последовательности действий которые необходимо выполнить над данными для решения поставленной задачи
2. системное программное обеспечение включает в себя операционную систему и сервисные программы
3.операционная система это комплекс программ обеспечивающих совместное функционирование всех устройств компьютера и предоставляющих пользователю доступ к ресурсам компьютера
4.аппаратный Интерфейс - это средства обеспечивающие взаимодействие между устройствами компьютера для обеспечения совместного функционирования аппаратного обеспечения компьютера составляющая операционные системы входят драйверы драйверы это устройство специальные программы управляющие работой подключенных к компьютеру устройств
5.пользовательский Интерфейс это средства обеспечивающие взаимодействие человека и компьютера
6.русский компьютера это последовательная загрузка программ операционной системы из долговременной памяти в оперативную память компьютера
7.сервисные программы это различные программы обслуживающие диски программы-архиваторы программы для борьбы с компьютерными вирусами коммуникационные программы и многие другие

Условие в вопросе и комментариях различается, поэтому приведу два варианта.
1) Программа выводит элементы с четными номерами(те, которые стоят в массиве на четных местах)

Program n1;
const n=10;
var a: array[1..n] of integer;
i: integer;
begin
writeln('Введите массив в одну строку через пробел:');
for i:=1 to n do read(a[i]);
writeln('элементы с четным номером:');
for i:=1 to n do if i mod 2=0 then write(a[i],' ');
end.

2) Программа выводит четные элементы массива

Program n1;
const n=10;
var a: array[1..n] of integer;
i: integer;
begin
writeln('Введите массив в одну строку через пробел:');
for i:=1 to n do read(a[i]);
writeln('четные элементы:');
for i:=1 to n do if a[i] mod 2=0 then write(a[i],' ');
end.