Задание 8BonpocК какому по относится текстовый процессор ?Выберите один из 4 бариантов ответа1) прикладное По общего назначения2) системное по3) система программирования4) прикладное по специального назначения. ​

система програмирования

program array3;

const

 L = 1;

 H = 10;

var

 n, i, s: Integer;

 A1, A2, A3: array [L..H] of Integer;

begin

 Randomize;

 for i := L to H do begin

   A1 [i] := Random (10);

   A2 [i] := Random (10);

   A3 [i] := Random (10);

 end;

 WriteLn ('Первый массив:');

 for i := L to H do

   Write (A1 [i], ' ');

 WriteLn;

 WriteLn ('Второй массив:');

 for i := L to H do

   Write (A2 [i], ' ');

 for i := L to H do

   if (i < 2) or (i > 7) then

     A3 [i] := A1 [i]

   else

     A3 [i] := A2 [i];

 WriteLn;

 WriteLn ('Результирующий массив:');

 for i := L to H do

   Write (A3 [i], ' ');

 WriteLn;

 ReadLn;

end.

Объяснение:

const

 L = 1;

 H = 10;

устанавливаются размерности для массивов, здесь можно их изменить

#include <iostream>

#include <time.h>

#include <cstdlib>

using namespace std;

int main() {

int n, s = 0, max = 0, min = 9;

srand(time(NULL));

 

do {

 cout << "Input size of matrix: n = ";

 cin >> n;

 if (n < 0)  

 {

  cout << "Input error! n < 0. Please try again" << endl;

  continue;

 }

 else break;

} while (true);

 

int **matr = new int* [n];

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

 matr[i] = new int [n];

 

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

{

 for (int j = 0; j < n;j++)  

 {

  matr[i][j] = rand() % 10;

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

 }

 cout << endl;

}

 

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

{

 if (max < matr[i][i])

  max = matr[i][i];

 if (min > matr[i][n-i-1])

  min = matr[i][n-i-1];

 s += matr[i][i] + matr[i][n - i - 1];

}

if (n % 2 != 0)

 s -= matr[n / 2][n / 2];

cout <<"Maximum number on the main diagonal: " << max << endl << "Minimum number on the secondary diagonal: " << min << endl << "Sum of numbers on the diagonals: " << s;

 

return 0;

}

/* Редактор не сохраняет отступы зачастую, поэтому прикрепил .cpp файл с кодом */