// Para actualizar el fichero de índices
a=registro.palabra1[0]-65;
fseek(findex,a*sizeof(struct index),SEEK_SET); // Busca posicion
fread(&entrada, sizeof(struct index), 1, findex); // Lee índice
entrada.cantidad++; // incrementa
fseek(findex,a*sizeof(struct index),SEEK_SET); // Vuelve a la posición
fwrite(&entrada, sizeof(struct index), 1, findex); // Actualiza el índice
//