CLR_shenanigans_21

#include "stdafx.h"

using namespace System;

String^ matrix_to_string(array<int, 2>^ matrix) {
    String^ output;
    for (int i = 0; i < matrix->GetLength(0); i++) {
        for (int j = 0; j < matrix->GetLength(1); j++) {
            output += matrix[i, j] + "\t";
        }
        output += "\n";
    }
    return output;
}

String^ array_to_string(array<int>^ arr, int length) {
    String^ output;
    for (int i = 0; i < length; i++) {
        output += arr[i] + "\t";
    }
    return output;
}

int main(array<System::String ^> ^args)
{
    const int SIZE = 5;

    Random^ r = gcnew Random();

    array<int, 2>^ A = gcnew array<int, 2>(SIZE, SIZE);
    array<int, 2>^ Q = gcnew array<int, 2>(SIZE, SIZE);


    float a_main_diagonal_average = 0;
    float q_main_diagonal_average = 0;


    for (int i = 0; i < SIZE; i++) {
        for (int j = 0; j < SIZE; j++) {
            A[i, j] = r->Next(0, 100);
            Q[i, j] = r->Next(0, 100);
            if (i == j) {
                a_main_diagonal_average += A[i, j];
                q_main_diagonal_average += Q[i, j];
            }
        }
    }

    a_main_diagonal_average /= SIZE;
    q_main_diagonal_average /= SIZE;

    Console::WriteLine("Матрица A:");
    Console::WriteLine(matrix_to_string(A));

    Console::WriteLine("Матрица Q:");
    Console::WriteLine(matrix_to_string(Q));


    Console::WriteLine("Среднее арифметическое элементов главной диагонали матрицы A: " + a_main_diagonal_average);
    Console::WriteLine("Среднее арифметическое элементов главной диагонали матрицы Q: " + q_main_diagonal_average);

    array<int>^ R = gcnew array<int>(SIZE * SIZE);
    array<int>^ B = gcnew array<int>(SIZE * SIZE);


    int r_counter = 0;
    int b_counter = 0;

    for (int i = 0; i < SIZE; i++) {
        for (int j = 0; j < SIZE; j++) {
            if (A[i, j] > a_main_diagonal_average) {
                B[b_counter] = A[i, j];
                b_counter++;
            }
            if (Q[i, j] > q_main_diagonal_average) {
                R[r_counter] = Q[i, j];
                r_counter++;
            }
        }
    }

    Console::WriteLine("Массив B, содержащий элементы матрицы А, большие среднего арифметического ее главной диагонали: ");
    Console::WriteLine(array_to_string(B, b_counter));

    Console::WriteLine("Массив R, содержащий элементы матрицы Q, большие среднего арифметического ее главной диагонали: ");
    Console::WriteLine(array_to_string(R, r_counter));





    return 0;
}