//---------------------------------------------------------------------------
#include <conio.h>
#include <iostream.h>
#include <math.h>
#include <iomanip.h>

//-----------Некоторые-необходимые-функции-для-работы-со-строками------------
//---------------------------------------------------------------------------
char * SubStr(char * String, int Start, const int End, bool DeleteOldString = true)
{
 if(!String || End <= Start || strlen(String) < (End - Start))return NULL;

 unsigned int newStrLen(End - Start);
 char * Result = new char[newStrLen];

 for(int i( 0 ) ; i < newStrLen ; i++, Start++, Result[i] = '\0')
  Result[i] = String[Start];

 if(DeleteOldString && String){delete String; String = NULL;}
 return Result;
}
//---------------------------------------------------------------------------
char * StrDel(char * String, int Index, const int Count, bool DeleteOldString = true)
{
 if(!String || Count ==  0 )return NULL;

 unsigned int StrLen(strlen(String)), newStrLen(StrLen - Count);
 unsigned int i( 0 );

 if(Index + Count > StrLen)return SubStr(String, Index, Index + Count, DeleteOldString);

 char * Result = new char[newStrLen];

 for(i =  0  ; i < Index ; i++, Result[i] = '\0')
  Result[i] = String[i];
 for(int j(Index + Count) ; i < StrLen ; i++, j++, Result[i] = '\0')
  Result[i] = String[j];

 if(DeleteOldString && String){delete String; String = NULL;}
 return Result;
}
//---------------------------------------------------------------------------
char * StrAdd(char * String, const char Simbol, bool DeleteOldString = true)
{
 char * Result(NULL);

 if(!String || strlen(String) <  1 )
 {
  Result = new char[ 2 ];
  Result[ 0 ] = Simbol;
  Result[ 1 ] = '\0';

  return Result;
 }
 else
 {
  unsigned int newStrLen(strlen(String) +  1 ), i;
  Result = new char[newStrLen +  1 ];

  for(i =  0  ; i < newStrLen -  1  ; i++)
   Result[i] = String[i];
  Result[i] = Simbol;
  Result[i +  1 ] = '\0';

  if((newStrLen -  1 ) >  0  && DeleteOldString){delete String; String = NULL;}
  return Result;
 }
}
//---------------------------------------------------------------------------
char * StrAdd(char * String, const char * String2, bool DeleteOldString = true)
{
 char * Result(NULL);

 if(!String2 && !String)return NULL;
 if(!String2 && String)
 {
  DeleteOldString = false;
  Result = String;
 }
 else if(!String && String2)
 {
  unsigned int _newStrLen(strlen(String2));
  Result = new char[_newStrLen +  1 ];
  for(int i( 0 ) ; i < _newStrLen ; i++, Result[i] = '\0')Result[i] = String2[i];
 }
 else//(String && String2)
 {
  unsigned int str_len1(strlen(String)), str_len2(strlen(String2)),
               newStrLen(str_len1 + str_len2), i;
  Result = new char[newStrLen];

  for(i =  0  ; i < str_len1 ; i++)Result[i] = String[i];
  for(int j( 0 ) ; j < str_len2 ; j++, i++)Result[i] = String2[j];

  Result[i +  1 ] = '\0';
 }

 if(DeleteOldString && String){delete String; String = NULL;}
 return Result;
}
//-----------------------------Задания---------------------------------------
//---------------------------------------------------------------------------
char * ex1(char * Stroka)
{
 if(!Stroka)return "Oshibka";

 int k(strlen(Stroka)), k1, n, pr, pr1;
 char * str1(NULL), * str(NULL), * Result(NULL);

 for(n =  0  ; Stroka[k] != ' ' ; n++, k--);

 str1 = SubStr(Stroka, k +  1 , n + k);

 for(int i( 0 ) ; i < k ; i++)
 {
  if(Stroka[i] != ' ')str = StrAdd(str, Stroka[i]);
  else
  {
   pr =  0 ;
   k1 = strlen(str);
   for(int j( 0 ) ; j < k1/ 2  ; j++)if(str[j] != str[k1 - j -  1 ])pr =  1 ;

   if(pr ==  0 )
    if(str && str1 && strlen(str) == strlen(str1))
    {
     pr1 =  0 ;
     for(int j( 0 ) ; j < strlen(str) ; j++)if(str[j] != str1[j])pr1 =  1 ;
    }
    else pr1 =  1 ;

   if(pr ==  0  && pr1 ==  1 ){//if(Result)cout<<Result<<endl;;
   Result = StrAdd(Result, '\n');
   Result = StrAdd(Result, str);}

   if(str){delete str; str = NULL;}
  }
 }

 if(!Result)return "Ni odnogo slova";
 else return Result;
}
//---------------------------------------------------------------------------

char * ex2(const char * String, int &DD_Count)
{
 int a( 0 ), strLen(strlen(String));
 char * Result = new char[strLen];
 DD_Count =  0 ;
 strcpy(Result, String);

 for(int q(strLen) ; q >=  0  ; q--)
  if(Result[q] == ':')
  {
   Result = StrDel(Result, q,  1 );
   DD_Count++;
  }

 return Result;
}
//---------------------------------------------------------------------------

int ex3(const char * String)
{
 int a( 0 ), strLen(strlen(String)), Result( 0 );

 for(int m( 0 ) ; m < strLen ; m++)
  if((String[m] == ',' || String[m] == '.') &&
     (String[m -  1 ] == 'w' || String[m -  1 ] == 'W'))
   Result++;

 return Result;
}
//---------------------------------------------------------------------------

int main(int argc, char* argv[])
{
 int KEY( 1 );
 START:

 cout<<endl<<"Viderite deistvie."<<endl
     <<" 1. Napechatat te slova? kotori otlichni ot poslednego.\n"
     <<" 2. Ydalit vse \":\"\n"
     <<" 3. Opredilit kol-vo slov, ok. na \"w\"\n"
     <<"\n 0. Exit\n";

 cin>>KEY;

 switch(KEY)
 {
  default:
  case  0 :
   return  0 ;
  break;
  case  1 :
  {
   char * Vopros = new char[ 100 ];
   cout<<"\nVvedite predlogenie\n";
   cin>>Vopros;
   char * Otvet = ex1(Vopros);//ex1("121 NgN BtB MnM CfC AAA");//
   if(Otvet)cout<<Otvet;
  }
  break;
  case  2 :
  {
   char * Vopros = new char[ 100 ], * Otvet;
   int DD_count( 0 );
   cout<<"\nVvedite predlogenie\n";
   cin>>Vopros;

   Otvet = ex2(Vopros, DD_count);//"123NNN:BBB:AAA",
   cout<<"Otvet: "<<Otvet<<"\nKol-vo \":\" - "<<DD_count;
  }
  break;
  case  3 :
  {
   char * Vopros = new char[ 100 ];
   cout<<"\nVvedite predlogenie\n";
   cin>>Vopros;

   cout<<"\nKol-vo slov zak. na\"w\" - "<<ex3(Vopros);
  }
  break;
 }

 getch();
 goto START;
}
//---------------------------------------------------------------------------