/* ----------------------------------------------------------------------------
  Leen una serie de numeros introducidos por el usuario hasta introducir el
  valor 0.
  Como  maximo puede haber  10 valores diferentes.
  Muestrar las veces que se repitan cada número mediante una lista de asteriscos
  EL valor 0 no es válido e indica final de secuencia
  Ej -  3,4,94,23,3,3,4,5,23,0
   3:***
   4:*
   5:*
  23:**
  94:*

----------------------------------------------------------------------------- */


#include <stdio.h>
#define   Nmax  10  /* Máximo números de valores diferentes */

int main()
{
int nelem; /* Número de elementos almacenados */
int tablad[Nmax]; /* Tabla de datos */
int tablaf[Nmax]; /* Tabla de frecuencias */
char encontrado;
int i,j;
char opcion;
int cont;
int resu;
int num;
int auxd;
int auxf;

// -----------------------------------------
// Relleno la tabla y anoto frecuencias
// ----------------------------------------
nelem = 0;
printf("Introduzca la lista de numeros(0 para terminar):\n ");
printf(">");
scanf("%d", & num);
while ( num != 0 )
   {
   // Busco si está el elemento
   encontrado='n';
   for (i=0;i<nelem;i++)
   	{
        if (num==tablad[i])
      	{
	 // Incremento la frecuencia del valor
         tablaf[i]++;
         encontrado='s';
	     break;
         }
      }
   // Si no se ha encontrado lo anoto en
   // la tabla si cabe
   if (encontrado=='n')
      {
      tablad[nelem] = num;
      tablaf[nelem] = 1;
      nelem++;
      if (nelem == Nmax )
      	{
      	puts("Tabla completa. \n");
      	break; // Salida forzada del while 
      	}
     }
  printf(">");
  scanf("%d", & num);
  }   

//  Ordeno las dos tablas por valores 
//  mediante burbuja

for (i=0;i<nelem-1;i++)
	{
    for (j=0;j<nelem-i-1;j++)
    	{
      	if (tablad[j]> tablad[j+1])
         	{
            /* Intercambio datos y frecuencias */
            auxd=tablad[j];
            auxf=tablaf[j];
            tablad[j]= tablad[j+1];
            tablaf[j]= tablaf[j+1];
            tablad[j+1] = auxd;
            tablaf[j+1] = auxf;
            }
      }
   }

// Muestros los resultados
// -----------------------
puts("\nTabla de frecuencias :");
for (i=0;i<nelem;i++)
 	{
   printf("%3d :", tablad[i]);
   for (cont= 1;cont <= tablaf[i];cont++)
      	{
         putchar('*');
         }
   printf("\n");
   }

 
 getchar();getchar();
 }