/* fichero escaño.c*/
/* Calculo de escaños por partido (d'Hondt). */
#include <stdio.h>
#define    N_ESC    2           /* número de escaños en liza. */
#define    N_PAR    3           /* número de partidos que concurren */
void main(void)
{
    int  i, esca;
    int  n_esc[N_PAR];     /* n_esc{[N_PAR]= nº de escaños por partido*/
    long n_votos[N_PAR];   /* n_votos[N_PAR]=nº de votos por partido*/
    int  next_esc(long *, int *);   /* definición de función */
    
    for(i=0; i<N_PAR; ++i)
        n_esc[i]=0;
    printf("Teclea el nº de votos de cada partido.\n");
    for (i=0; i<N_PAR; ++i) {
        printf("\nPartido %d: ", i+1);
        scanf("%ld", &n_votos[i]);
    }
    
    for(i=0; i<N_ESC; ++i) {           /* asignación de escaños */
        esca = next_esc(n_votos, n_esc);
        n_esc[esca] = n_esc[esca]+1;
    }
    for (i=0; i<N_PAR; ++i) 
        printf("\nEl partido %d ha obtenido %d escaños.", 
            i+1, n_esc[i]);
}
int next_esc( long n_votos[], int n_esc[]) 
{
    int  imaximo=0, i;
    long maximo=0;
    for( i=0; i<N_PAR; ++i) {
        if( maximo<(n_votos[i]/(n_esc[i]+1)) ) {
            maximo=n_votos[i]/(n_esc[i]+1);
            imaximo=i;
        }
    }
    return imaximo;
}