В ЧЕМ ОШИБКА var f:text;
n,i,s,x:integer;
begin
assign(f,'номера.txt');
reset(f);
readln(f,n);
s:=0;
for i:=1 to n do
begin
read(f,x);
if x mod 2=0 then s:=s+x
end;
writeln('СУМА ',s);
close(f)
end.

1)

#include <iostream>

using namespace std;

int main ()

{

   int k = 0;

   int n, m, a[100][100];

   cin >> n >> m;

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

       for (int j = 0; j < m; j++){

           cin >> a[i][j];      

       }

   }

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

       for (int j = 0; j < m; j++){

        if(a[i][j]==a[j][i]){

        k++;

        }

       }

   }

   cout<<"Количество элементов a[i][j] = a[j][i], " << k << endl;

}

2)

#include <iostream>

using namespace std;

int main ()

{

   int a[100], n, m,s = 0;

   cout << "Введите количество элементов массива" << endl;

   cin >> n;

   cout << "Введите заданное число" << endl;

   cin >> m;

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

       cout << "Введите " << i+1 << " элемент массива" << endl;

       cin >> a[i];

   }

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

       if(a[i] > m){

           s+=a[i];

       }

   }

   cout << "Сумма элементов, больших заданного числа "<< s << endl;

}

ответ ниже

Объяснение:

Векторная графика представления объектов и изображений (формат описания) в компьютерной графике, основанный на математическом описании элементарных геометрических объектов, обычно называемых примитивами, таких как: точки, линии, сплайны, кривые Безье, круги и окружности, многоугольники.

Растровое изображение (лат. rastrum — грабли) — изображение, представляющее собой сетку (мозаику) пикселей — цветных точек (обычно прямоугольных) на мониторе, бумаге и других отображающих устройствах