Cod sursa(job #99340)

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

void go()
{
fgets(a,100001,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));
}

int main()
{
go();
for(unsigned long i=0;i<=strlen(a);i++)
if(b[i]==1) k++;

fprintf(g,"%D",k);
return 0;
}