Написать функцию поиска парных фрагментов
//------------------------------------------------------prg1pr-03.cpp
int find(char c[])
{
for (int i=0; c[i]!=0; i++)
for (int j=i+1; c[j]!=0; j++)
{
for (int k=0; i+k<j && c[i+k]==c[j+k]; k++);
if (k>=4) return i;
}
return -1;
}