//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include <iostream.h>
#include <math.h>
#include <conio.h>

//---------------------------------------------------------------------------
                              //MA--Mex      AM--Ak
#pragma argsused

const int n=5;

void main(void)
{ float MA[n], AM[n];
  MA [0]=6   ; MA [1]=7.5;  MA[2]=11.5;   MA [3]=19   ; MA [4]=0.5;
  AM [0]=5.5 ; AM [1]=9  ;  AM[2]=15  ;   AM [3]=18.5 ; AM [4]=0  ;

// '''''''''''''''''''''''''''''''''''''''''''''''

  float Mex[n][n], Ak[n][n],/* Mat[n][n],*/ TMex[n][n];
  int   i, j;
  float a5x5[n][n];  // обзначим a5x5= Mat[n][n]
    
  for (i=0;i<n;i++)
       for (j=0;j<n;j++)
          {
               Mex[i][j]=MA[j]-(AM[i]+6);  // 6-(5.5+6)=-5.5+24=18.5
               while( Mex[i][j]<0 ) { Mex[i][j]+=24; }  //ожидание в МЕХИКО
               Ak[i][j]=AM[j]-(MA[i]+6);
               while( Ak[i][j]<0 ) {Ak[i][j]+=24;}     //ожидание в АКАПУЛЬКЕ
          }
                   printf("\n");

// '''''''''''''''''''''''''''''''''''''''''''''''
      printf("Ojidanie v Mechiko");
       printf("\n");
  for  (i=0;i<n;i++)
  {
         for (j=0;j<n;j++)
         {
          TMex[i][j]=0;
          TMex[j][i]=Mex[i][j];
          TMex[i][j]=Mex[j][i];
          printf(" %5.1f",TMex[i][j]);

                    }
        cout<<endl;
                    }
// '''''''''''''''''''''''''''''''''''''''''''''''
  printf("Ojidanie v Akapul'ko\n");
  for  (i=0;i<n;i++)
  {
        for (j=0;j<n;j++)
             printf("%6.1f",Ak[i][j]);
        cout<<endl;
                   }

// '''''''''''''''''''''''''''''''''''''''''''''''
    // составляем одну общую мамтрицу из наименьших чисел
    // удовлетворяяющих условию >4 ,но <24
    // поиск нужных элементов и вывод их на экран
    // все в одном цикле
      cout<<endl;
      printf("Obchai matrica\n");

  for (i=0;i<n;i++)
  {
          for (j=0;j<n;j++)
                {

                       /* поиск нужной нам разницы часов*/
  a5x5[i][j]=0;
      if ((TMex[i][j]>Ak[i][j]) && (TMex[i][j]>4) && (Ak[i][j]>4)) a5x5[i][j]=Ak[i][j];
       else
            if((TMex[i][j]<Ak[i][j]) && (TMex[i][j]>4 ) && (Ak[i][j]>4)) a5x5[i][j]=TMex[i][j];
       else
            if((TMex[i][j]<Ak[i][j]) && (TMex[i][j]>=4) && (Ak[i][j]>4)) a5x5[i][j]=Ak[i][j]  ;
       else
            if((TMex[i][j]<Ak[i][j]) && (TMex[i][j]<4 ) && (Ak[i][j]>4)) a5x5[i][j]=Ak[i][j]  ;
       else
            if((TMex[i][j]>Ak[i][j]) && (TMex[i][j]>=4) && (Ak[i][j]<4)) a5x5[i][j]=TMex[i][j];
                       /* вывод */
         printf("%6.1f",a5x5[i][j]);
                  }
                  cout<<endl;
   }
// '''''''''''''''''''''''''''''''''''''''''''''''


//////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////

    int   b=0;
    //матрицы, необходимые для заполнения
    //при "вырезке" сответствующей сторчки
    //и столбца
    float a4x4[n-1][n-1];
    float a3x3[n-2][n-2];
    float a2x2[n-3][n-3];
///////////////////////////////////
                /////////////////////////////////////////
    //сумма её номер
    int   SumNumber=0;         // номер суммы 5!=120
    float sum[120];
    float i05x5[n];            // создаем массивы
    float i04x4[n-1];          // чтобы запомнить элементы
    float i03x3[n-2];          // которые портятся
    float min=1000;
    //так обозначим номера столбцов из соотвествующй строчки
    //где находится минимальный элемент
    //которые образуют минимальную сумму
    //нам необходимую 
    int min5, min4, min3, min2, min1;
          printf ("\n");

          //Заполняем массив i05x5
          //это значит строчка (i) с номером 0 в матрице 5x5
          for (j=0;j<n;j++)
               {
                i05x5[j]=a5x5[0][j];
                //printf("%6.1f",i05x5[n]);
               }
/*+++++++++++++++++++++++++++++++++*/
        // обнуление сумм и их номеров
    for (i=0;i<120;i++)
        sum[i]=0;         // сумма
        SumNumber=0;      // её номер
////////////////////////////////////////
                                        ////////////////////////////////////////
   //весь этот цикл применяю для заполнения
   //соответствующих матриц,
   //которые образуются при "зачёркивании"
   //соответствующего слобца и номера
   //в данном цикле она проосто
   //игнорирует сответствующий столбец и строчку
    for(int a5j=0; a5j<n; a5j++)
    { //заполнение матрицы 4x4
        for (int i4=0; i4<n; i4++)
            for (int j4=0; j4<n; j4++)
            {
                 if (j4!=a5j)
                {
                    j4<a5j?b=0:b=-1;                   //сдвиг на нужную позицию
                    a4x4[i4][j4+b]=a5x5[i4+1][j4];
                }

            }
        //Заполняем массив i04x4
        //это значит строчка (i) с номером 0 в матрице 4x4

        for (j=0;j<n-1;j++)
        {
            i04x4[j]=a4x4[0][j];
            //printf("%6.1f",i04x4[n]);
        }
        //cout<<endl;

        for(int a4j=0; a4j<n-1; a4j++)
        { //заполнение матрицы 3x3
            for (int i3=0; i3<n-1; i3++)
                for (int j3=0; j3<n-1; j3++)
                {
                    if (j3!=a4j)
                    {
                        j3<a4j?b=0:b=-1;
                        a3x3[i3][j3+b]=a4x4[i3+1][j3]; //сдвиг на нужную позицию
                    }
                }
            /*Заполняем массив i03x3*/
            /*это значит строчка (i) с номером 0 в матрице 3x3*/
            for (j=0;j<n-2;j++)
            {
                i03x3[j]=a3x3[0][j];
                //printf("%6.1f",i03x3[n]);
            }
            //cout<<endl;
            for (int a3j=0; a3j<n-2; a3j++)
            {
                //заполнение матрицы 2x2
               for (int i2=0; i2<n-2; i2++)
                    for (int j2=0; j2<n-2; j2++)
                    {
                        if (j2!=a3j)
                        {
                            j2<a3j?b=0:b=-1;
                            a2x2[i2][j2+b]=a3x3[i2+1][j2]; //сдвиг на нужную позицию
                        }
                    }
            //производим суммирование элементов
                sum[SumNumber]=i05x5[a5j]+i04x4[a4j]+i03x3[a3j]+a2x2[0][0]+a2x2[1][1];
                int a2j=0,a1j=0;
            //поиск минимальной суммы
                if(sum[SumNumber]<min)
                {
                    min=sum[SumNumber];
            //и для того, чтобы как-то выделить
            //нужные нам элементы,
            //которые образуют минимальную сумму
            //сдвиним их относительно
            //соответствующей матрицы
            //в матрицу 5x5
            //в итоге: при выводе координат элементов
            //координаты будут относительно
            //матрицы 5x5

                    min5=a5j;
                    //min4
                    //переход-сдвиг 4-5
                    min4=(a4j>=a5j)?a4j+1:a4j;

                    //min3
                    //переход-сдвиг 3-4
                    min3=(a3j>=a4j)?a3j+1:a3j;

                    //min3
                    //переход-сдвиг 4-5
                    if(min3>=a5j)
                                min3=min3+1;

                    //min2
                    //переход-сдвиг 2-3
                    min2=(a2j>=a3j)?min2=a2j+1:min2=a2j;

                    //переход-сдвиг 3-4
                    if(min2>=a4j)
                        min2=min2+1;

                    //переход-сдвиг 4-5
                    if(min2>=a5j)
                        min2=min2+1;

                    //min1
                    //переход-сдвиг 1-2
                    min1=(a1j>=a2j)?min1=a1j+1:min1=a1j;

                    //переход-сдвиг 2-3
                    if(min1>=a3j)
                        min1=min1+1;

                    //переход-сдвиг 3-4
                    if(min1>=a4j)
                        min1=min1+1;

                    //переход-сдвиг 4-5
                    if(min1>=a5j)
                        min1=min1+1;
                }
                SumNumber++;// накапливание индекса суммы
                sum[SumNumber]=i05x5[a5j]+i04x4[a4j]+i03x3[a3j]+a2x2[0][1]+a2x2[1][0];
                a2j=1,a1j=0;
                /*if(sum[SumNumber]<min)
                { */
                if(sum[SumNumber]<min)
                {
                    min=sum[SumNumber];
                    min5=a5j;
                    //min4
                    //переход-сдвиг 4-5
                    min4=(a4j>=a5j)?a4j+1:a4j;

                    //min3
                    //переход-сдвиг 3-4
                    min3=(a3j>=a4j)?a3j+1:a3j;

                    //min3
                    //переход-сдвиг 4-5
                    if(min3>=a5j)
                                min3=min3+1;

                    //min2
                    //переход-сдвиг 2-3
                    min2=(a2j>=a3j)?min2=a2j+1:min2=a2j;

                    //переход-сдвиг 3-4
                    if(min2>=a4j)
                        min2=min2+1;

                    //переход-сдвиг 4-5
                    if(min2>=a5j)
                        min2=min2+1;

                    //min1
                    //переход-сдвиг 1-2
                    min1=(a1j>=a2j)?min1=a1j+1:min1=a1j;

                    //переход-сдвиг 2-3
                    if(min1>=a3j)
                        min1=min1+1;

                    //переход-сдвиг 3-4
                    if(min1>=a4j)
                        min1=min1+1;

                    //переход-сдвиг 4-5
                    if(min1>=a5j)
                        min1=min1+1;
                }
                SumNumber++; //накапливание индекса суммы
            }//3 конец цикла три
        }//4     конец цткла четыри
    }//5         конец цикла пять
    ShowMessage(min);
    printf("%3.3f\n", min);
   /* for(int ddd=0;ddd<120;ddd++)
        printf("%d - %3.3f\n",ddd,sum[ddd]);*/ //вывод номера и суммы

    //вывод координат элементов
   // printf("%5.1f [%d,%d,%d,%d,%d]\n\n\n",min,min5,min4,min3,min2,min1);

    for(i=0;i<n;i++)
    {
        if(i==min5)
            textcolor(12);
        else
            textcolor(15);
        cprintf("%6.1f",i05x5[i]);
    }
    //выделим эти элементы
    //относительноо всех остальных
    printf("\n");
    for (i=1;i<n;i++)
    {
        for (j=0;j<n;j++)
        {
            if((j==min4 && i==1) || (j==min3 && i==2) || (j==min2 && i==3) || (j==min1 && i==4))
                textcolor(12);
            else
                textcolor(15);
            cprintf("%6.1f",a5x5[i][j]);
        }
        printf("\n");
    }
          
getch();

}
//---------------------------------------------------------------------------