Var arr : array [1..30] of integer; i, number : integer; begin //Заполнение массива случайными числами for i := 1 to 30 do arr[i] := Random(10000) - 5000; //--- //Считывание номера элемента и проверка на соответствие условию write('Введите число: '); readln(number); if not (number in [1..30]) then begin write('Ошибка. Номер элемента выходит за границу массива'); Exit; end; //--- //Вывод массива с учётом условия for i := 1 to 30 do if arr[i] > arr[number] then write(arr[i], ' '); //--- end.
#include<cstdlib>
#include<ctime>
#include<locale>
#include<windows.h>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian");
srand(time(NULL));
const int n=12, m=12;
int a[n][m];
int s = 0;
for(int i=0;i<n;i++)
{
for(int j=0;j<m;j++)
{
a[i][j] = rand() % 2;
if(a[i][j]) a[i][j] = rand()%100;
else a[i][j] = rand()%50*(-2);
cout << a[i][j] << ' ';
}
cout << '\n';
}
cout << '\n';
int c;
cout << "Введите номер столбца: ";
cin >> c;
for(int i=0; i < 12; i++)
if(a[i][c] > 0) s++;
cout << "Количество положительных чисел в столбце " << c << ": " << s << '\n';
system("pause");
}