53 lines
1.6 KiB
Markdown
53 lines
1.6 KiB
Markdown
{
|
|
R : Renvoie Vrai si l'année passée en paramètre est bisextile.
|
|
E : année un entier
|
|
S : un booléen en fonction de si l'année est bisextile
|
|
}
|
|
verifAnneBisextile : une fonction (annee : un entier) -> booléen
|
|
|
|
{
|
|
R : Renvoie vrai si le mois saisi est bien entre 1 et 12
|
|
E : mois un entier positif
|
|
S : un booléen en fonction de la validité du mois
|
|
}
|
|
verifMois : une fonction (mois : un entier positif) -> booléen
|
|
|
|
{
|
|
R : Verifie si le jour saisi est valide en fonction du mois et de l'année
|
|
E : jour, mois 2 entiers positifs, anneeEstBisextile un booléen
|
|
S : un booléen en fonction de la validité du jour
|
|
}
|
|
verifJour : une fonction (jour : un entier positif, mois : un entier positif, anneeEstBisextile : un booléen) -> booléen
|
|
|
|
{
|
|
R : Verifie si jour, mois et annee sont valides
|
|
E : jour, mois, annee : 3 entiers positifs
|
|
S : booléen en fonction de si la date est valide
|
|
}
|
|
verifDate(jour : un entier positif, mois : un entier positif, annee : un entier positif) -> booléen
|
|
|
|
|
|
Lexique : {Principal}
|
|
{Les déclarations de fonctions}
|
|
|
|
jourSaisie : un entier positif
|
|
moisSaisie : un entier positif
|
|
anneeSaisie : un entier positif
|
|
dateValide : un booléen
|
|
Algorithme : {Principal}
|
|
Début
|
|
Ecrire("Veuillez saisir le jour")
|
|
Lire(jourSaisie)
|
|
|
|
Ecrire("Veuillez saisir le mois")
|
|
Lire(moisSaisie)
|
|
|
|
Ecrire("Veuillez saisir l'année")
|
|
Lire(anneeSaisie)
|
|
|
|
dateValide <- verifDate(jourSaisie, moisSaisie, anneeSaisie)
|
|
|
|
Si dateValide
|
|
Alors Ecrire("La date saisie est valide")
|
|
Sinon Ecrire("La date saisie est invalide")
|
|
Fin |