#include <stdio.h>
#include <conio.h>

int getM(int M[],int x);
void printM(int M[],int x);
int checkM(int M[],int x);
int palM(int M[],int x);
int readF(int M[],int x);
void writeF(int M[],int x);
void plsfillM();

int main()
{
 int choice;
 int x,n=0;
 int A[100];

 do
 {
   printf("Menu\n\n");
   printf("1. Populnete masiva\n");
   printf("2. Proverka za nalichie po stoinost\n");
   printf("3. Otpechatvane na masiva\n");
   printf("4. Proverka za palindrom\n");
   printf("5. Zarejdane na masiv ot fail\n");
   printf("6. Zapis na masiv na fail\n");
   printf("7. Exit\n\n");
   printf("Izberete opciq ot menuto: ");
   scanf("%d",&choice);

   switch (choice)
   {
     case 1:
     {
          n=getM(A,n);
          break;
     }
     case 2:
     {
          x=checkM(A,n);
          if (x==-1)
          {
              plsfillM();
          }
          else if (x==-2)
          {
              printf("Chisloto go nqma v masiva \n\n");
          }
          else
          {
              printf("Chisloto go ima v masiva i na poziciq: %d \n\n",x);
          }
          break;
     }
     case 3:
     {
          printM(A,n);
          break;
     }
     case 4:
     {
          x=palM(A,n);
          if (x==-1)
          {
              plsfillM();
          }
          else if (x==-2)
          {
              printf("Nqma palindrom v masiva  \n\n");
          }
          else
          {
              printf("Purviq palindrom v masiva e: %d \n\n",x);
          }
          break;
     }
     case 5:
     {
          n=readF(A,n);
          break;
     }
     case 6:
     {
          writeF(A,n);
          break;
     }
     case 7:
     {
          system("cls");
          printf("Goodbye\n");
          break;
     }
     default:
     {
          system("cls");
          printf("Wrong Choice. Enter again\n");
          break;
     }
   }
 }
 while (choice != 7);
 getch();
}


int getM(int M[],int x)
{
 int i;
 system("cls");
 printf("Izberete s kolko chisla shte bude masiva(do 100)\n");
 scanf("%d",&x);
 if(x>0 && x<=100)
 {
   printf("Populnete masiva\n");
   for(i=0;i<x;i++)
   {
     scanf("%d",&M[i]);
   }
   printf("\n\n");
   return x;
 }
 else
 {
   system("cls");
   printf("nevaliden broi chisla\n\n");
   return 0;
 }
}


void printM(int M[],int x)
{
 int i;
 if (x==0)
 {
   plsfillM();
 }
 else
 {
   system("cls");
   printf("masiva se sustoi ot slednite elementi\n");
   for(i=0;i<x;i++)
   {
     printf("%d\n",M[i]);
   }
   printf("\n\n");
 }
}



int checkM(int M[],int x)
{
 int a,i;
 if (x==0)
 {
   return -1;
 }
 else
 {
   system("cls");
   printf("Proverka dali chisloto go ima v masiva: \n");
   scanf("%d",&a);
   i=0;
   while (i<x && a!=M[i])
   {
     i++;
   }
   if (i<x)
   {
     return i;
   }
   else
   {
     return -2;
   }
 }
}



int palM(int M[],int x)
{
 int i,a;
 if (x==0)
 {
   return -1;
 }
 else
 {
   system("cls");
   for(i=0;i<x;i++)
   {
     a = M[i];
     int reversed=0;
     while (a>0)
     {
       reversed=reversed*10+a%10;
       a/=10;
     }
     if (M[i] == reversed)
     {
       return M[i];
     }
   }
   return -2;
 }
}


int readF(int M[],int x)
{
 FILE *f;
 int a,i;
 char file[200];
 system("cls");
 printf("kude se namira vashiqt file: ");
 scanf("%s", file);
 i=0;
 f=fopen(file, "r");
 if(!f)
 {
   printf("File ne sushtestvuva\n");
   return 0;
 }
 else
 {
   while(fscanf(f, "%d", &a) != EOF)
   {
     if(i<100)
     {
       M[i]=a;
       i++;
     }
   }
   x=i;
   fclose(f);
   return x;
 }
}


void writeF(int M[],int x)
{
 FILE *f;
 int i;
 if (x==0)
 {
   plsfillM();
 }
 else
 {
   system("cls");
   char file[200];
   printf("kude se namira vashiqt file: ");
   scanf("%s", file);
   f=fopen(file,"w");
   if(!f)
   {
     printf("File ne sushtestvuva\n");
   }
   else
   {
     for(i=0;i<x;i++)
     {
       fprintf(f,"%d\n",M[i]);
     }
     fclose(f);
   }
   printf("\n\n");
 }
}


void plsfillM()
{
   system("cls");
   printf("Molq purvo populnete masiva\n\n");
}