Algorithme Calcul_Date_lendemain
{
        variable j, m, a, jl, ml, al,nbj : entier
        
        Afficher("Cet algorithme calcule la date lendemain\n")
        Afficher("Entrez le jour : ")
        Saisir(j)
        Afficher("Entrez le mois : ")
        Saisir(m)
        Afficher("Entrez l'année : ")
        Saisir(a)
        
        
        // Determination du nombre de jours du mois
        Si (m = 2) alors
        {
                Si (a mod 4 = 0) alors
                {
                        nbj <-- 29
                }
                sinon
                {
                        nbj <-- 28
                }

        }
        sinon
        {
                Si ((m=1) OU (m=3) OU (m=5) OU (m=7) OU (m=8) OU (m=10) OU (m=12)) alors
                {
                        nbj <-- 31
                }
                sinon
                {
                        nbj <-- 30
                }
                
        }
        
        Si (j < nbj) alors
        {
                jl <-- j + 1
                ml <-- m
                al <-- a
        }
        sinon
        {
                // on est en fin de mois
                Si (m = 12) alors
                {
                        jl <-- 1
                        ml <-- 1
                        al <-- a+1
                }
                sinon
                {
                        jl <-- 1
                        ml <-- m + 1 
                        al <-- a                
                }
        }
        
        Afficher("Le jour du lendemain du ", j,"/",m,"/",a," est le ",jl,"/",ml,"/",al,"\n")
        
}