C > palindrome

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


void Creer(FILE *fp)
{


char f[30];
printf("fichier: /n");
scanf("%s",f);
fp=fopen(f,"r") ;

if (fp==NULL )
{printf("probleme ouverture!!!"); }
}

int Palindrome (char *ch)
{
  int I,J; /* indices courants */
int p; /* indicateur logique: vrai si CH est un palindrome */
     

 /* Contrôler si CH est un palindrome */
p=1;
for (I=0,J=strlen(ch) ; p && I<J ; I++,J--)
if (ch[I] != ch[J])
p=0;
return p;
}


int  main()
{
    FILE  *fp;
    char *s;char *ch;
int L,n,i,p;
Creer(fp) ;
n=1;
while (fgets(s,100,fp))
{  
 for(i=1;i<=strlen(s);i++)
{
if (s[i]==' ')
{
ch=strncpy (s,ch,i-n);
n=i;
}

p=Palindrome(ch);
/* Affichage du résultat */
if(p)
{  
printf("La chaîne %s est un palindrome. elle es dans la ligne %d",ch, L);
}
 
else
{
printf("La chaîne %s n'est pas un palindrome.", ch);
}
}

}
close(fp);
return(0);}