Voilà un exemple de projet utilisant le TAD (Type Abstrait de Données) Ensemble tel que nous l'avons vu dans le dernier cours.
J'ai fait quelques modifications:
- J'ai défini une constante NULL. Dans le cas vu en cours hier, nous implémentions le TAD Ensemble par une LLC. Or, si nous voulions implémenter le TAD Ensemble comme un tableau, il n'existe pas une chose qui s'appelle nil et donc il faudrait recorriger les programmes pour les adapter. Aussi ai-je défini une constante NULL. Dans le ccas ou le TAD Ensemble est implémenté par une LLC, NULL = nil. Si c'est un tableau de 1 à une valeur fixée, NULL = 0.
- J'ai réécrit les sous programmes Rechercher et Supprimer un élément d'une LLC qui avaient été perdus.
- J'ai ajouté une fonction RechercheNonBouleenne qui au lieu de retourner vrai ou faux, retourne le pointeur courant et le pointeur précédent pour faciliter la suppression par la suite.
- Enfin, j'ai transformé le programme principal en remplaçant les tartines de code pour lire un ensemble ou l'afficher par des appels à des fonctions que j'ai réécrites dans l'unité Ensembles.
Je publierai ultérieurement une projet Lazarus pour une implémentation du TAD Ensemble en utilisant un tableau..
Voilà le lien pour télécharger le projet:
Commentaires
Enregistrer un commentaire