Расставьте приведённые строки в такой последовательности , чтобы получился общий вид программы на языке Паскаль. В ответе запишите последовательность букв - обозначений строк. А var <описание используемых переменных>; В program <имя программы>; С end. Д begin <начало программного блока>.

⫷B⫸⫷A⫸⫷D⫸⫷C⫸

⫷B⫸⫷A⫸⫷D⫸⫷C⫸

#include <iostream>

#include <iomanip>

using namespace std;

int main()

{

   int r = 0, k = 0, t = 0;

   const int N = 50;

   char array[N];

   cin.getline(array, N);

   for (int i = 0; array[i]; i++)

   {

       if (array[i] == 'r')

       {

           r++;

       }

       if (array[i] == 'k')

       {

           k++;

       }

       if (array[i] == 't')

       {

           t++;

       }

   }

   cout << "r =  " << r << endl;

   cout << "k =  " << k << endl;

   cout << "t =  " << t << endl;

   return 0;

}

#include <iostream>

#include <ctime>

using namespace std;

int main()

{

   srand(time(0));

   int quantity = 0;

   const int size = 4;

   int arr[size][size] = {};

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

   {

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

       {

           arr[i][j] = rand() % 31;

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

       }

       cout << endl;

   }

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

   {

       if (arr[i][i] == 0)

       {

           quantity++;

       }

   }

   cout << quantity;

}

Объяснение:

Если пишете в codeblocks, то добавьте библиотеку stdlib.h

#include <iostream> // Библиотека ввода - вывода

#include <ctime> // Библиотека для работы со временем

using namespace std; // Пространство имён

int main()

{

   srand(time(0)); // Обнуляем время (каждый раз новые числа в массиве)

   int quantity = 0; // Создание целочисленной переменной, хранящей количество нулевых элементов, расположенных на главной диагонали

   const int size = 4; // Константная целочисленная переменная, хранящая в себе размер квадратной матрицы

   int arr[size][size] = {}; // Создание целочисленной квадратной матрицы, заполненной нулями

   for (int i = 0; i < size; i++) // Идём по массиву

   {

       for (int j = 0; j < size; j++) // Идём по массиву

       {

           arr[i][j] = rand() % 31; // Заполнения массива числами диапазона [0, 30]

           cout << arr[i][j] << " "; // Вывод значений

       }

       cout << endl; // Перевод на следующую строку

   }

   for (int i = 0; i < size; i++) // Так как нам нужна только главная диагональ, а индексы этих элементов равны, то используем только один цикл

   {

       if (arr[i][i] == 0) // Если элемент главной диагонали = 0

       {

           quantity++;  // Количество + 1

       }

   }

   cout << quantity; // Вывод ответа

}