Soit Tdate un type date composé des champs entiers JJ,MM,AA.
- Ecrire une AP CompareD permettant de comparer deux dates D1 et D2.
- Soit TD un tableau de N dates (N≤100). En utilisant l’AP CompareD, écrire un algorithme permettant
de trier ce tableau dans l’ordre croissant des dates.
POURQUOI ON A ICI UTILISÉ UNE FONCTION ET PAS UNE PROCÉDURE :!PLEAASE HELP!!
Code:Type Tdate = Enregistrement JJ,MM,AA :entier ; Fin ; On considère une Fonction pouvant prendre 1 Pour >, 0 Pour = et -1 Pour < Fonction CompareD(D1,D2 :Tdate) :entier ; Debut Si D1.AA>D2.AA Les Enregistrements Exercices Corrigés d’Algorithmique – 1ére Année MI 41 Alors CompareD←1 Sinon Si D1.AA<D2.AA Alors CompareD← -1 Sinon Si D1.MM>D2.MM Alors CompareD←1 Sinon Si D1.MM<D2.MM Alors CompareD← -1 Sinon Si D1.JJ>D2.JJ Alors CompareD←1 Sinon Si D1.JJ<D2.JJ Alors CompareD← -1 Sinon CompareD← 0 Fsi Fsi Fsi Fsi Fsi Fsi ; Fi
-----