update exo

This commit is contained in:
Vincent Guillet
2025-04-02 11:36:40 +02:00
parent c8e200b42f
commit ffa14f55ad
4 changed files with 0 additions and 62 deletions

View File

@@ -1,12 +0,0 @@
a entier
debut
ecrire "Entrer un nombre: "
lire a
a = a * a
afficher a
fin

View File

@@ -1,43 +0,0 @@
j entier
m entier
a entier
b booléen
DEBUT
ECRIRE "Entrez un jour"
LIRE j
ECRIRE "Entrez un mois"
LIRE m
ECRIRE "Entrez une année"
LIRE a
SI (j <= 0 OU j > 31) OU (m <= 0 OU m > 12) OU (a <= 0) ALORS
ECRIRE "Erreur dans la date"
SINON
SI ((a%4 == 0 ET a%100 != 0) OU (a%400 == 0)) ALORS
b = VRAI // Année bissextile
SINON
b = FAUX // Année non bissextile
FINSI
SI (m == 2) ALORS
SI (b == VRAI ET j <= 29) OU (b == FAUX ET j <= 28) ALORS
ECRIRE "Date valide"
SINON
ECRIRE "Erreur dans la date"
FINSI
SINON SI (m == 4 OU m == 6 OU m == 9 OU m == 11) ALORS
SI (j <= 30) ALORS
ECRIRE "Date valide"
SINON
ECRIRE "Erreur dans la date"
FINSI
SINON
SI (j <= 31) ALORS
ECRIRE "Date valide"
SINON
ECRIRE "Erreur dans la date"
FINSI
FINSI
FINSI

View File

@@ -7,16 +7,13 @@ DEBUT
ECRIRE "Entrez un jour"
LIRE j
ECRIRE "Entrez un mois"
LIRE m
ECRIRE "Entrez une année"
LIRE a
SI (j <= 0 OU j > 31) OU (m <= 0 OU m > 12) OU (a <= 0) ALORS
ECRIRE "Erreur dans la date"
SINON
SI ((a%4 == 0 ET a%100 != 0) OU (a%400 == 0)) ALORS
b = VRAI // Année bissextile
@@ -30,21 +27,17 @@ SINON
SINON
ECRIRE "Erreur dans la date"
FINSI
SINON SI (m == 4 OU m == 6 OU m == 9 OU m == 11) ALORS
SI (j <= 30) ALORS
ECRIRE "Date valide"
SINON
ECRIRE "Erreur dans la date"
FINSI
SINON
SI (j <= 31) ALORS
ECRIRE "Date valide"
SINON
ECRIRE "Erreur dans la date"
FINSI
FINSI
FINSI