voici la déclaration de mes structures de données:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
type
   T_donnee = string;
   T_liste_adj = ^T_elt_liste;
   T_elt_liste= record
                   personne:T_donnee;
                   psuiv: T_liste_adj;
               end;
 
   T_tab=record
           rang:integer; //Rang des éléments du tableau
           personne:string; //Prenom de la personne
           pere:string;//pere de la personne
           mere:string; //mere de la personne
           epoux:string; //conjoint de la personne
           enfant: T_liste_adj; //enfant de la personne
        end;
Quelqu'un aurait une idée de programmation pour obtenir les différents liens de parenté (père,oncle, cousin,frère,fils...) entre deux personnes du tableau?

A l'avance merci.