Вычислить произведение элементов массива, находящихся между минимальным и максимальным элементами

int i=0; //min индекс
int j=0; //max индекс
int Proizvedenie=1;
int Z=0; //максимальное число на первой функции потом мин
int A[10]={{5},{1},{3},{2},{4},{4},{8},{9},{99},{2}};
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
 
}
BOOL MAX()
{
    int isl;
    for(int k=0;k<10;k++)
    {
        isl=A[k];
        if(isl>Z){Z=A[k];j=k;}
    }
}
BOOL MIN()
{
    int isl;
    for(int k=0;k<10;k++)
    {
        isl=A[k];
        if(isl<Z){Z=A[k];i=k;}
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    MAX();
    MIN();
    if(i<j)
    {
        for(int k=i;k<=j;k++)
        {
            Proizvedenie=Proizvedenie*A[k];
        }
    }
    if(j<i)
    {
        for(int k=j;k<=i;k++)
        {
            Proizvedenie=Proizvedenie*A[k];
        }
    }
}