Algorithme Calcul_des_aires_et_surfaces_des_carre_rectangle_et_cercle
{
        // Déclaration des variables
        variable c,Aca,Pca,l,L,Ar,Pr,r,Ace,Pce:réel
        
        constante réel pi <-- 3.1416
        
        // Début des instructions
        Afficher("Cet algorithme va calculer les aires et périmètres d'un carré, d'un rectangle et d'un cerle.\n")
        Afficher("Saisissez le coté du carré : ")
        Saisir(c)
        Afficher("Saisissez la longueur du rectangle : ")
        Saisir(L)
        Afficher("Saisissez la largeur du rectangle : ")
        Saisir(l)
        Afficher("Saisissez le rayon du cercle : ")
        Saisir(r)

        Aca <-- c*c
        Pca <-- 4*c
        Ar <-- l*L
        Pr <-- 2*(l+L)
        Ace <-- pi*r*r
        Pce <-- 2*pi*r

        Afficher("Pour le carré, l'aire est ",Aca," et le périmètre est ",Pca,".\n")
        Afficher("Pour le rectangle, l'aire est ",Ar," et le périmètre est ",Pr,".\n")
        Afficher("Pour le cercle, l'aire est ",Ace," et le périmètre est ",Pce,".\n")
}