Cod sursa(job #98366)

Utilizator c_iulyanCretu Iulian c_iulyan Data 10 noiembrie 2007 12:52:25
Problema Abc2 Scor 0
Compilator cpp Status done
Runda Happy Coding 2007 Marime 0.44 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);
int q=strlen(x)-1;
if(x[q]=='\n') x[q]=0;
p=strstr(a,x);
b[int(p)-93231]=1;
}while(!feof(f));
return k-1;
}

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