---

// Форма с: TextBox (textBox2), Button (button2), Label (label2)

private: System::Void button2_Click(System::Object^  sender, System::EventArgs^  e) {
    int num = int::Parse(textBox2->Text);
    int product = 1;
    int minEven = 10;
    
    while (num > 0) {
        int digit = num % 10;
        product *= digit;
        
        if (digit % 2 == 0 && digit < minEven) {
            minEven = digit;
        }
        
        num /= 10;
    }
    
    if (minEven == 10) 
        label2->Text = "Произведение = " + product.ToString() + "\nЧетных цифр нет";
    else 
        label2->Text = "Произведение = " + product.ToString() + "\nМин четная = " + minEven.ToString();
}