Найти произведение модулей наибольшего отрицательного и наименьшего четного элемента массива

private: System::Void button1_Click(System::Object^  sender, System::EventArgs^  e) {
 
int k = System::Convert::ToInt32(textBox1->Text);
int* mas;
mas = new int [k];
String^ str = "";
srand(time(NULL));
for(int i = 0; i < k; ++i)
{
     mas[i] = rand()%20-10 ;
     str = str->Format(str + "{0} ", mas[i]);
}
textBox2->Text = str;
             
             }

#include "stdafx.h"
using namespace System;
 
int main(array<System::String ^> ^args) {
    int size = 10;
    array<int>^ arr = gcnew array<int>(size);
    Random^ rndGen = gcnew Random();
    int maxNeg = Int32::MinValue;
    int minEven = Int32::MaxValue;
 
    for (int i = 0; i < arr->Length; i++) {
        // заполнение случайными числами
        arr[i] = rndGen->Next(-10, 11);
        // наибольший отрицательный
        if (arr[i] < 0 && arr[i] > maxNeg) {
            maxNeg = arr[i];
        }
        // наименьший чётный
        if (arr[i] % 2 == 0 && arr[i] < minEven) {
            minEven = arr[i];
        }
    }
 
    Console::WriteLine(Math::Abs(maxNeg) * Math::Abs(minEven));
 
    return 0;
}

private: System::Void button3_Click(System::Object^  sender, System::EventArgs^  e) {
    double proiz;
    int maxNeg = Int32::MinValue;
    int minEven = Int32::MaxValue;
 
    for (int i = 0; i < arr->Length; i++) {
            
        // наибольший отрицательный
        if (arr[i] < 0 && arr[i] > maxNeg) {
            maxNeg = arr[i];
        }
        // наименьший чётный
        if (arr[i] % 2 == 0 && arr[i] < minEven) {
            minEven = arr[i];
        }
    proiz=maxNeg*minEven;
    textBox4->Text = proiz.ToString();
    }
         }

private: System::Void button3_Click(System::Object^  sender, System::EventArgs^  e) {
    double proiz;
    int maxNeg = Int32::MinValue;
    int minEven = Int32::MaxValue;
 
    for (int i = 0; i < arr->Length; i++) {
            
        // наибольший отрицательный
        if (arr[i] < 0 && arr[i] > maxNeg) {
            maxNeg = arr[i];
        }
        // наименьший чётный
        if (arr[i] % 2 == 0 && arr[i] < minEven) {
            minEven = arr[i];
        }
    proiz=abs(maxNeg)*abs(minEven);
    textBox4->Text = proiz.ToString();
    }
         }

// наименьший чётный
if (arr[i] > 0 && arr[i] % 2 == 0 && arr[i] < minEven) {
    minEven = arr[i];
}