Составьте иерархическую структуру управления школой с вложеных папок.​

#include <iostream>

#include <cstdlib>

#include <ctime>

using namespace std;

 

int main()

{

   srand((int)time(0));

   int M, N;

   cout << "M="; cin >> M;

   

   do

   {

   cout << "N="; cin >> N;

   if (N%2!=0) cout << "N - even. Repeat please...\n";

   }

   while (N%2!=0);

   

     double **a = new double*[M];  

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

      a[i]=new double[N];

   

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

   {

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

   {

   a[i][j]=rand()%9 + 1;

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

   }

   cout << "\n";

   }

   cout << "\n";

   

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

   for (int j = 0; j < N/2; j++)    

   swap (a[i][j],a[i][j+N/2]);

   

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

   {

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

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

   

   cout <<"\n";

   }

 

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

   delete[]a[i];

   delete[]a;

 

system("pause");

return 0;

}

Объяснение:

Var
  a, b, c, d: real;
begin
  write('Введите коэффициенты a,b,c ');
  readln(a, b, c);
  d := sqr(b) - 4 * a * c;
  if d = 0 then
    writeln('Корень один x = ', (-b / (2 * a))
    else if d >0 then
      writeln('x1 = ',(-b + sqrt(d)) / (2 * a), ' x2 = ',(-b - sqrt(d)) / (2 * a))
    else writeln('Действительных корней нет');
end.

Тест №1

Введите коэффициенты a,b,c 1 -5 6
x1 = 3 x2 = 2

Тест №2

Введите коэффициенты a,b,c 1 2 3
Действительных корней нет

Тест №3

Введите коэффициенты a,b,c 1 0 0
Корень один x = 0