Cod sursa(job #98378)

Utilizator c_iulyanCretu Iulian c_iulyan Data 10 noiembrie 2007 12:57:40
Problema Abc2 Scor 0
Compilator cpp Status done
Runda Happy Coding 2007 Marime 0.52 kb
#include<string.h>
#include<stdio.h>
FILE *f=fopen("abc2.in","r"),*g=fopen("abc2.out","w");
char a[10000010],x[30],b[10000010];
long k;
char *p;

long go()
{
fgets(a,10000010,f);
a[strlen(a)-1]=0;
do
{
   fgets(x,30,f);

   long q=strlen(x)-1;

   if(x[q]=='\n') x[q]=0;
      p=strstr(a,x);

   long w=int(p)-93231;

   if(w>0)
      b[w]=1;
      
}while(!feof(f));

return k-1;
}

int main()
{
go();
for(unsigned long i=0;i<=strlen(a);i++)
if(b[i]==1) k++;
fprintf(g,"%D",k);
return 0;
}