void Diccionario(char *szNombre, char szPalabras[][TAMTOKEN], int iEstadisticas[], int &iNumElementos)
{
	//char szNombre[50];
	//printf("Dame el nombre del archivo");
	//scanf_s("%s", szNombre, 49);
	FILE *libro;
	fopen_s(&libro, szNombre, "r");
	char palabra[TAMTOKEN];
	char *palabra1;
	char szPalabras1[NUMPALABRAS][TAMTOKEN];
	int estad[NUMPALABRAS];
	char *next = NULL;
	int i, j, k, conta = 0;
	int numpala;
	int mayor[NUMPALABRAS];
	char aux[100];
	if (libro == NULL)
	{
		printf("No se pudo abrir el archivo");
	}
	else
	{
		i = 0;

		while (!feof(libro))
		{
			fscanf_s(libro, "%s", palabra, 49);
			_strlwr_s(palabra);
			palabra1 = strtok_s(palabra, " ;,.)(", &next);
			while (palabra1 != NULL)
			{
				//printf("%s\n", palabra1);
				strcpy_s(szPalabras1[i], palabra1);
				palabra1 = strtok_s(NULL, " ;,.)(", &next);
				i++;
			}
			//strcpy_s(diccionario[i], palabra1);
			
			//printf("%s\n", diccionario[i]);
			//i++;

		}
		numpala = i;

		// ORDENAR CADENAS
		for (i = 0; i < numpala -1 ; i++)
		{
			k = i;
			strcpy_s(aux, szPalabras1[i]);
			for (j = i + 1; j < numpala; j++)
			{
				if (strcmp(szPalabras1[j], aux) < 0)
				{
					k = j;
					strcpy_s(aux, szPalabras1[j]);
					//permite hacer una copia auxiliar de la cadena szPalabras[j];
				}
			}
			strcpy_s(szPalabras1[k], szPalabras1[i]);
			strcpy_s(szPalabras1[i], aux);
		}

		for (i = 0; i < numpala; i++)
		{
			//printf("%s\n", diccionario[i]);

		}

		}
		//ordenamos por estadisticas.
		for (i = 0; i < numpala; i++)
		{
			estad[i] = 0;
			for (j = 0; j < numpala; j++)
			{
				if (strcmp(szPalabras1[i], szPalabras1[j]) == 0)
				{
					estad[i]++;
				}

			}

		}
		i = 0;
		while (i < numpala)
		{
			if (estad[i] != 1)
			{
				//printf("La palabra %s se repite %i veces\n", diccionario[i], esta[i]);
			}
			else
			{
				//printf("La palabra %s solo se encuentra una vez\n", diccionario[i]);
			}

			i = i + estad[i];
		}
	iNumElementos = 0;
		for (i = 0; i < numpala; i++)
		{
			if (strcmp(szPalabras1[i], szPalabras1[i + 1]) != 0)
			{
				iNumElementos++;
			}
		}
		//printf("%i\n", iNumElementos);
		
		i = 0;

		while (i < numpala)
		{
			mayor[i] = 0;
			if (estad[i] != 1)
			{
				for (j = i; j < i + estad[i]; j++)
				{

					if (estad[j] >= mayor[i])
					{
						mayor[i] = estad[j];
					}
					else
					{
						mayor[i] = mayor[i];
					}
				}
				
			}
			else
			{
				mayor[i] = estad[i];
				
			}
			//imprimimos diccionario
			//printf("%s %i\n", szPalabras[i], mayor[i]);
			strcpy_s(szPalabras[conta], szPalabras1[i]);
			iEstadisticas[conta] = mayor[i];
			conta++;
			i = i + estad[i];
			
		}
	
	fclose(libro);

}

	FILE *libro;
	fopen_s(&libro, "libro.txt", "r");
	char diccionario[TAMTOKEN][TAMPALABRA];
	char palabra[TAMPALABRA];
	char *palabra1;
	char palabra2[TAMPALABRA];
	char *next = NULL;
	int i, j, k, k1;
	int numpala;
	int mayor[TAMTOKEN];
	int esta[TAMTOKEN];
	int larg;
	char aux[100];
	if (libro == NULL)
	{
		printf("No se pudo abrir el archivo");
	}
	else
	{
		i = 0;
		while (!feof(libro))
		{
			fscanf_s(libro, "%s", palabra, 99);
			//fgets(palabra, 99, libro);
			palabra1 = strtok_s(palabra, " ;,.)(", &next);
		
			strcpy_s(diccionario[i], palabra1);
			_strlwr_s(diccionario[i]);
			printf("%s\n", diccionario[i]);
			i++;

		}

#include <stdio.h>
#include "stdafx.h"
#include <windows.h>

void main(void)
{
	int dat, i, j, k1, aux;
	int num[2000];
	float cal[2000], aux1;
	float mayor = 0;

	//printf("Dame el numero de datos: ");
	scanf_s("%i", &dat);
	int k[2000];

	for (i = 0; i < dat; i++)
	{
		//printf("Dame el numero de cuenta numero %i: ", i+1);
		scanf_s("%i", &num[i]);
		//printf("Dame la calificacion numero %i: ", i+1);
		scanf_s("%f", &cal[i]);

	}

	for (i = 0;i<dat;i++)
	{
		for (j = 0;j<dat - 1;j++)
		{
			if (num[j] >= num[j + 1])
			{
				aux = num[j];
				num[j] = num[j + 1];
				num[j + 1] = aux;

				aux1 = cal[j];
				cal[j] = cal[j + 1];
				cal[j + 1] = aux1;

			}
		}
	}
	//printf("Ordenados de manera Ascendente\n");
	for (i = 0;i<dat;i++)
	{
		//printf("%i %f\n", num[i], cal[i]);
	}
	//printf("\n");
	//printf("Ordenados de manera descendente\n");
	for (i = dat - 1;i >= 0;i--)
	{
		//printf("%i %f\n", num[i], cal[i]);	
	}
	for (i = 0;i<dat;i++)
	{
		k[i] = 0
			;
		for (j = 0;j<dat;j++)
		{
			if (num[i] == num[j])
			{
				k[i]++;
			}

		}

	}
	//printf("\n");
	i = 0;
	while (i<dat)
	{
		if (k[i] != 1)
		{
			//printf("El numero de cuenta %i se repite %i veces\n", num[i], k[i]);
		}
		else
		{
			//printf("El numero de cuenta %i solo se encuentra una vez\n", num[i]);
		}

		i = i + k[i];
	}
	//printf("\n");
	k1 = 0;
	for (i = 0;i<dat;i++)
	{
		if (num[i] != num[i + 1])
		{
			k1++;
		}
	}
//Programa realizado por Carlos Valdes
	printf("%i\n", k1);
	i = 0;
	while (i<dat)
	{
		if (k[i] != 1)
		{
			for (j = i;j<k[i];j++)
			{

				if (cal[j] >= mayor)
				{
					mayor = cal[j];
				}
				else
				{
					mayor = mayor;
				}
			}
		}
		else
		{
			mayor = cal[i];
		}
//checa que aqui se imprimen solo una calificacion, si se repite solo mostrara la mas alta
		printf("%i %.2f\n", num[i], mayor);
		i = i + k[i];
	}
}