#include<stdio.h>
#include<stdlib.h>

int* wyszukajIndeksZnaku(char* t, char k, int* ilosc);
char* wyszukajWyrazOdZnaku(char* t, char k,int* dlugosclan);
int cyfry(char* t, int* ile);


int main()
{
char tab[50];
char k;
int* index=NULL;
char* tabwyrazow=NULL;
int ili=0;
int ilc=0;
int dlugosclan=0;
int i;
int max=0;
fflush(stdin);
printf("\n Wpisz lancuch ponizej : ");
fflush(stdin);
fgets (tab, 50, stdin);
printf("\nOto lancuch, ktory tak uprzejmie zadeklarowales:\n %s",tab);
printf("\nPodaj znak jaki chcesz wyszukac:");
fflush(stdin);
k=getchar();
printf("\nWyszukiwany przez Ciebie znak to:%c",k);
index=wyszukajIndeksZnaku(tab,k,&ili);
printf("\nIndeksy miejsc, na ktorych znajduje sie poszukiwany znak:");
for(i=0;i<ili;i++)
    {printf(" %d ",*(index+i));
    }
printf("\nIlosc poszukiwanych znakow w lancuchu: %d",ili);
tabwyrazow=wyszukajWyrazOdZnaku(tab,k,&dlugosclan);
printf("\nWyrazy zaczynajace sie na dany znak: ");
for(i=0;i<dlugosclan;i++)
    {printf("%c",*(tabwyrazow+i));
    }
printf("\nMaxymalna cyfra w lancuchu znakow to: %d", cyfry(tab, &ilc));
printf("\nLiczba cyfr w lancuchu to: %d",ilc);
}

int* wyszukajIndeksZnaku(char* t, char k,int* ilosc)
{
int i=0,j=0;
int *p=NULL;
p=(int*)malloc((j+1)*sizeof(int));
    for(i=0;*(t+i)!='\0';i++){
        if(*(t+i)==k){
        *(p+j)=i;
        j++;
        p=(int*)realloc(p,(j+1)*sizeof(int));
        *ilosc=*ilosc+1;

    }
    }
return p;
}
char* wyszukajWyrazOdZnaku(char* t, char k, int* dlugosclan)
{   int i,j=0,h;
    char* p=NULL;
    p=(char*)malloc((j+1)*sizeof(char));

    for(i=0;*(t+i)!='\0';i++)
    {       if(i==0 && *(t+i)==k)
            for(h=i;*(t+h)!='\0' && *(t+i)!=' ';h++)
            {
                *(p+j)=*(t+h);
                j++;
                p=(char*)realloc(p,(j+1)*sizeof(char));
                i=h;
            }
            if(i!=0 && *(t+i)==k && *(t+i-1)==' ')
            for(h=i;*(t+h)!='\0' && *(t+i)!=' ';h++)
            {
                *(p+j)=*(t+h);
                j++;
                p=(char*)realloc(p,(j+1)*sizeof(char));
                i=h;
            }
    }
    *dlugosclan=j;
    return p;
}
int cyfry(char* t, int* ile)
{int i,j=0;
char* p=NULL;
int max;
p=(char*)malloc((j+1)*sizeof(char));
    for(i=0;*(t+i)!='\0';i++)
    {
        if(*(t+i)>='0' && *(t+i)<='9')
        {
            *(p+j)=*(t+i);
            j++;
            p=(char*)realloc(p,(j+1)*sizeof(char));
        }
    }
    max=(*p)-'0';
    for(i=0;i<j;i++)
        max=(*(p+i)-'0')>max ? (*(p+i)-'0'):max;
*ile=j;
    return max;

}