Ответ:

Program abc;

Const n=35;

Var a, b:array[1.. N] of integer;

i, j:integer;

Begin

Randomize;

For i:=1 to N do

a[i]:= random (20)-15;

For i:=1 to N do

Write (a[i]:4);

j:=1;

For i:= 1 to N do

If a[i]>10 then

Begin

b[j]:=a[i];

Inc[j];

End;

For i:= 1 to N do

Write(b[i],' ');

Readln;

End.

Объяснение:могу быть не прав

Ответ:

C++

#include <iostream>

#include <ctime>

using namespace std;

int main() {

setlocale(LC_ALL, "Russian");

srand(time(NULL));

int arr[20],sum=0;

for (int i = 0; i < 20; i++)

{

 arr[i] = rand() % 36+(-15);

}

cout << "Обычный массив -> ";

for (int i = 0; i < 20; i++)

{

 cout << arr[i] << "  ";

}

cout << endl << "Элементы массива которые больше 10 ->";

for (int i = 0; i < 20; i++)

{

 if (arr[i]>10) {

  cout << arr[i] << "  ";

 }

}

cout << endl;

 system("pause");

 return 0;

}

Объяснение: