Algorithme Calcul_du_Lendemain
{
        variable j,m,a,jl,ml,al : entier
        
        Afficher("Cet algorithme calcule la date du lendemain pour une date saisie sous la forme 1 à 31 pour le jour, 1 à 12 pour le mois, etc.\n")
        
        Afficher("Entrez le jour actuel : ")
        Saisir(j)
        Afficher("Entrez le mois actuel : ")
        Saisir(m)
        Afficher("Entrez l'année actuelle : ")
        Saisir(a)
        

        Si ((m = 1) ou (m = 3) ou (m = 5) ou (m = 7) ou (m = 8) ou (m = 10) ou (m = 12)) alors
        {
                Si (j < 31) alors
                {
                        jl <-- j+1
                        ml <-- m
                        al <-- a
                }
                sinon // le jour est donc ici 31
                {
                        Si (m=12) alors
                        {
                                jl <-- 1
                                ml <-- 1
                                al <-- a+1
                        }
                        sinon
                        {
                                jl <-- 1
                                ml <-- m+1
                                al <-- a
                        }
                }
                
        }
        sinon
        {
                Si ((m = 4) ou (m = 6) ou (m = 9) ou (m = 11)) alors
                {
                        Si (j < 30) alors
                        {
                                jl <-- j+1
                                ml <-- m
                                al <-- a
                        }
                        sinon // le jour est donc ici 30
                        {
                                jl <-- 1
                                ml <-- m+1
                                al <-- a
                        }
                }
                sinon // on est en Février
                {
                        Si ((a mod 4) == 0) alors
                        {
                                // On est bissextile
                                
                                Si (j < 29) alors
                                {
                                        jl <-- j+1
                                        ml <-- m
                                        al <-- a
                                }
                                sinon // le jour est donc ici 29
                                {
                                        jl <-- 1
                                        ml <-- m+1
                                        al <-- a
                                }
                        }
                        sinon // Année classique (non bissextile)
                        {
                                Si (j < 28) alors
                                {
                                        jl <-- j+1
                                        ml <-- m
                                        al <-- a
                                }
                                sinon // le jour est donc ici 28
                                {
                                        jl <-- 1
                                        ml <-- m+1
                                        al <-- a
                                }                                
                        }
                }
        }
        
        Afficher("Le lendemain du jour ", j, "/", m, "/", a, " est le ", jl, "/", ml, "/", al,".\n") 

}