#include <stdio.h>
#include <conio.h>
#include <math.h>
#include <string.h>
#include <ctype.h>
#include <stdlib.h>

//prototipoak
void f1 (int a, char b);
int f2 (int a);
double f3 (double a, double b);
void f4 (int *erak, int L, int Z);
float f5 (int *erak, int D);
int f6 (char *erak);
void f7 ();
char f8 (void);
void f9(void);
void f10 (void);
float f11 (int *erak, int K);
float f12 (int *erak, int L, int Z);
int f13 (int *erak, int K, int balioa);
void f14 (char *erak, int N);
void f15 (char *erak, int N);
int *f16 (int *erak, int K);
char f17 (char *erak);
char *f18 (char *erak);

void f19 (char *erak);
void f20 (char *erak);
int f21 (char *erak);
float f22 (int *erak, int L, int Z, int *erakMax, int *erakMin);
int f23 (char *erak, int *erakKonts);
void f24 (long int Z, int *erakU, int *erakH, int *erakE, int *erakM, int *erakHM);

void main ()
{int T1D [10]={1,2,3,4,5,6,7,8,9,10};
int T2D [5][5]={{1,2,3,4,5},{1,2,3,4,5},{1,2,3,4,5},{1,2,3,4,5},{1,2,3,4,5}};
char Es [100] = "KAIXO lagun", Es2 [100] = "KAIXO lagun";
int U, H, E, M, HM, Bok = 0, Konts= 0, Max, Min;
float BB;

clrscr();
puts ("\nF1: 5 eta '+' parametroekin");
f1(5,'+');

puts ("\nF2: 567 zenbakiarekin");
printf ("\t %d",f2 (567));

puts ("\nF3: 3, 4 parametroekin");
printf ("\t %2.2f", f3 (3,4));

puts("\nF4: dimentsio bateko taula batekin");
f4(&T1D[0], 1, 10);

puts("\nF4: bi dimentsiotako taula batekin");
f4(&T2D[0][0], 5, 5);

puts ("F5: aurreko taularekin");
printf ("\t %1.2f", f5(&T2D[0][0], 5));

printf ("\nF6: \"%s\" esaldiarekin\n", Es);
printf ("\t %d", f6(&Es[0]));

puts("\nF7:");
f7();

puts("\nF8:");
printf ("\t %c",f8());

puts("\nF9:");
f9();

puts("\nF10:");
f10();
clrscr();

puts("\nF11: dimentsio bateko taularen batez bestekoa");
printf ("\t Batez besteko %1.3f da", f11 (&T1D[0], 10));

puts("\nF12: bi dimentsioko taularen batez bestekoa");
printf ("\t Batez besteko %1.2f da", f12 (&T2D[0][0], 5, 5));
puts("");

puts("\nF13: 1,2,3,4,5,6,7,8,9,10 taulan 6 balio zenbat aldiz");
printf ("\t %d balioa taulan %d aldiz agertzen da", 6, f13 (&T1D[0], 10, 6));

puts("\nF14:");
printf ("\t '%s' esaldian bukaerako 3 karaktereak kenduta:", Es);
f14(&Es[0], 3);
printf (" '%s'\n", Es);

puts("\nF15:");
printf ("\t '%s' esaldian hasierako 3 karaktereak kenduta:", Es2);
f15(&Es2[0], 3);
printf (" '%s'\n", Es2);

puts("\nF16:");
printf ("\t Taulan handiena %p helbidean dago eta %d balioa du", f16(&T1D[0], 10), *f16(&T1D[0], 10));

puts("\nF17:");
strcpy (Es, "bklk gbk sld");
printf ("\t '%s' esaldian '%c' da lehen bokala\n", Es, f17 (&Es[0]));
strcpy (Es, "bokala dituen esaldia");
printf ("\t '%s' esaldian '%c' da lehen bokala\n", Es, f17 (&Es[0]));

puts("\nF18:");
strcpy (Es, "bklk gbk sld");
printf ("\t '%s' esaldian memoriko %p helbidean dago azken bokola eta '%c' da\n", Es, f18 (&Es[0]), *f18(&Es[0]));
strcpy (Es, "bokalak dituen esaldia");
printf ("\t '%s' esaldian memoriko %p helbidean dago azken bokola eta  '%c' da\n", Es, f18 (&Es[0]), *f18(&Es[0]));

f10();
clrscr();

puts("\nF19:");
printf ("\t '%s' esaldian bokalak '*' ordezkatuz ", Es);
f19 (&Es[0]);
printf (" '%s' esaldia izango dugu\n", Es);

puts("\nF20:");
strcpy (Es, "bokalak dituen esaldia");
printf ("\t '%s' esaldia kodetuta, ", Es);
f20 (&Es[0]);
printf (" '%s' esaldia da\n", Es);
printf ("\t '%s' esaldia kodetuta, ", Es);
f20 (&Es[0]);
printf (" '%s' esaldia da\n", Es);

puts("\nF21: arra");
if (f21 ("arra"))
	{puts ("\t palindromoa da");}
else
	{puts ("Ez da palindromoa");}

puts("\nF21: laka");
if (f21 ("laka"))
	{puts ("\t palindromoa da");}
else
	{puts ("Ez da palindromoa");}

f10();
clrscr();

puts("\nF22: bi dimentsiotako taulan honetan: {{1,2,3,4,5},{1,2,3,4,5},{1,2,3,4,5},{1,2,3,4,5},{1,2,3,4,5}} ");
BB= f22 (&T2D[0][0], 5, 5, &Max, &Min);
printf ("\n\t Maximoa: %d da, minimoa %d da eta batez bestekoa: %1.2f da.", Max, Min, BB);
printf ("\n\nF23: '%s' esaldiak ", Es);
Bok = f23 (&Es[0], &Konts);
printf (" %d bokal eta %d kontsonante ditu", Bok, Konts);
puts("\n\nF24:   123456 zenbakiarekin ");
f24 (123456, &U, &H, &E, &M, &HM);
printf ("bueltatzen du unitatea: %d, hamarrekoa: %d, ehunekoa %d, milakoa: %d, hamarmilakoa %d", U, H, E, M, HM);
f10();
}

void f1 (int a, char b)
{int i;
for (i = 0; i < a; i++)
	{printf ("%c", b);}
}

int f2 (int a)
{
return ((a/10)%10);
}

double f3 (double a, double b)
{
return (sqrt(a*a+b*b));
}

void f4 (int *erak, int L, int Z)
{int i, j;
for (i =0; i<L; i++)
	{
	for (j=0; j<Z; j++)
		{printf ("%4d", *erak);
		erak++;}
	puts("");
	}
}

float f5 (int *erak, int D)
{int meta = 0;
int *erak2 = erak;
for ( ;erak2<= erak+((D*D)-1); )
	{meta = meta + *erak2;
	erak2 = erak2 + D+1;
	}
return (meta/D);
}

int f6 (char *erak)
{int i, kont;
i = strlen (erak);  //ESALDIAREN LUZERA
for (kont =0; i >0; erak++, i--)
	{switch (toupper(*erak))
		{case 'A':
		case 'E':
		case 'I':
		case 'O':
		case 'U':{kont++;}
		}
	}
return kont;
}


void f7 (void)
{int i;
for (i=0; i<5; i++)
	{printf ("*");}
}

char f8 ()
{
return ('A'+rand()%('Z'-'A'));
}

void f9(void)
{ int i, j;
for (i = 1; i < 8; i ++)
	{for (j = i ; j < 8; j++)
		{printf (" ");}
	for (j = 0; j<i; j++)
		{printf ("**");}
	puts ("");
	}
for (i = 0; i< 4; i++)
	{puts ("       **");}
}

void f10 ()
{
puts ("\nSakatu tekla bat...");
getch();
}

float f11 (int *erak, int K)
{float Met = 0.0;
int i;
for (i = 0; i < K; i++)
	{Met += *(erak+i);}
return Met / K;
}

float f12 (int *erak, int L, int Z)
{float Met = 0.0;
int i;
for (i = 0; i < L*Z; i++)
	{Met += *(erak+i);}
return Met / (L*Z);
}

int f13 (int *erak, int K, int balioa)
{
int i, kont=0;
for (i=0; i< K; i++, erak++)
	{if (*erak==balioa)
		{kont++;}
	}
return kont;
}

void f14 (char *erak, int N)
{
*(erak + strlen(erak)-N) = '\0';
}

void f15 (char *erak, int N)
{
strcpy (erak, (erak+N));
}

int *f16 (int *erak, int K)
{int *Max, i;
for (i=0, Max = erak; i < K; erak++, i++)
	{if (*erak > *Max)
		{Max = erak;}
	}
return Max;
}

char f17 (char *erak)
{int i, aurkitua = 0;
for (; *erak!='\0' && !aurkitua; erak++)
	{switch (toupper (*erak))
	       case 'A':
		   case 'E':
		   case 'I':
	       case 'O':
		   case 'U': aurkitua = 1;
		 }
if (aurkitua)
	{return *(erak-1);}
else
	{return *erak;}
}

char *f18 (char *erak)
{int i;
char *azkena = erak;

while (*erak != '\0')
	{switch (toupper (*erak))
		   {case 'A':
		   case 'E':
	       case 'I':
		   case 'O':
	       case 'U':{azkena = erak;}
	       }
	i++;
	erak++;
	}
switch (toupper (*azkena))
	   {case 'A':
	   case 'E':
	   case 'I':
	   case 'O':
	   case 'U':{break;}
	   default: {azkena = erak;}
	   }
return (azkena);
}

void f19 (char *erak)
{int i, luzera;
luzera = strlen (erak);
for (i=0; i < luzera; i++)
	{
	switch (toupper (*(erak+i)))
	   {case 'A':
	   case 'E':
	   case 'I':
	   case 'O':
	   case 'U':{*(erak+i)= '*';}
	   }
	}
}

void f20 (char *erak)
{int i, luzera;
luzera = strlen (erak);
for (i=0; i < luzera; i++)
	{
	switch (tolower (*(erak+i)))
	   {case 'a':
			{*(erak+i)= 'p';
			break;}
	   case 'p':
			{*(erak+i)= 'a';
			break;}
		case 'e':
			{*(erak+i)= 'm';
			break;}
		case 'm':
			{*(erak+i)= 'e';
			break;}
		case 'i':
			{*(erak+i)= 't';
			break;}
		case 't':
			{*(erak+i)= 'i';
			break;}
		case 'o':
			{*(erak+i)= 'l';
			break;}
		case 'l':
			{*(erak+i)= 'o';
			break;}
		case 'u':
			{*(erak+i)= 'r';
			break;}
		case 'r':
			{*(erak+i)= 'u';
			break;}
		}
	}
}

int f21 (char *erak)
{int i, j;
for (i= 0, j = strlen(erak)-1; (j>=0 && *(erak+i) == *(erak+j)); i++, j--);
if (j==-1)
	{return 1;} //BAI. Palindromoa da
else
	{return 0;}  //EZ. Ez da palindromoa.
}

float f22 (int *erak, int L, int Z, int *erakMax, int *erakMin)
{ int Kont = 0, Met = 0, i;
	*erakMax = *erak;
	*erakMin = *erak;
	for (i = 0; i < L*Z; i++, erak ++)
		{if (*erak < *erakMin)
			{*erakMin = *erak;}
		if (*erak > *erakMax)
			{*erakMax = *erak;}
		Met += *erak;
		Kont++;
		}
	return (Met/(Kont*1.0));
}

int f23 (char *erak, int *erakKonts)
{int i, luzera, kont = 0;

luzera = strlen (erak);
for (i=0, *erakKonts = 0; i < luzera; i++)
	{
	switch (toupper (*(erak+i)))
	   {case 'A':
	   case 'E':
	   case 'I':
	   case 'O':
	   case 'U':{kont++; 	//BOKALAK
				break;}
	   default:{*(erakKonts)+=1;} //KONTSONANTEAK
	   }
	}
	return kont;
}

void f24 (long int Z, int *erakU, int *erakH, int *erakE, int *erakM, int *erakHM)
{
*erakU = Z % 10;
Z= Z/10;
*erakH = Z % 10;
Z= Z/10;
*erakE = Z % 10;
Z= Z/10;
*erakM = Z % 10;
Z= Z/10;
*erakHM = Z % 10;
}