Void main()

{ char D[100], inf[60];

int c,i,L,K=0; ulong Lf=0;

printf("File = "); gets(inf);

FILE* f = fopen(inf,"rb");

errhalt(f==0,"Cannot open the File!");

printf("D = "); gets(D);

L=strlen(D);

// створити масив s, який буде працювати як стек

char* S= new char[L+1]; for (i=0;i<L+1;i++) S[i]=0;

for (;;) { c=fgetc(f); if (c==EOF) break; Lf++;

push(S,L,(char)c);

if (strcmp(S,D)==0) K++;

}

fclose(f);

delete[] S; // знищення динамічного масиву

printf("K = %d Lf = %lu \n",K,Lf);

}