Паскаль/С, пж
1. Создать целочисленный массив В из 30 элементов. Заполнить его случайными числами и вывести на экран в строку. Вывести на экран номера и значения положительных элементов.
2. Сформировать массив В с 5 строк и 5 столбцов. Заполнить его с клавиатуры строками, вывести на экран в виде таблицы. Вычислить произведение элементов главной диагонали.

Ответ:

1.

#include <iostream>

#include <algorithm>

#include <iomanip>

#include <cmath>

using namespace std;

int main()

{

   long long b[31], i;

   for(i = 0; i < 30; i++)

   {

       b[i] = rand();

       cout << b[i] << " ";

   }

   for(i = 0; i < 30; i++)

       if(b[i] > 0)

       cout << i << " " << b[i] << endl;

   return 0;

}

2.

#include <iostream>

#include <algorithm>

#include <iomanip>

#include <cmath>

using namespace std;

int main()

{

   long long b[5][5], i, j, sum = 1;

   for(i = 0; i < 5; i++)

       for(j = 0; j < 5; j++)

       {

           cin >> b[i][j];

           if(i == j)

               sum *= b[i][i];

       }

   for(i = 0; i < 5; i++)

       {

       for(j = 0; j < 5; j++)

           cout << b[i][j] << " ";

           cout << endl;

       }

       cout << sum << endl;;

   return 0;

}

Объяснение: